mirrors/clog
1
Fork 0
mirror of https://github.com/rabbibotton/clog.git synced 2026-02-06 15:52:06 -08:00
Code Issues Projects Releases Wiki Activity

Change from defconstant to defparameter

Browse source
This commit is contained in:
David Botton 2020-12-23 22:02:58 -05:00
parent 51bf8a2177
commit 47dcd877cd
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
clog-base.lisp
View file

@ -115,7 +115,7 @@ result. (Private)"))
;; parse-mouse-event ;;
;;;;;;;;;;;;;;;;;;;;;;;
(defconstant mouse-event-script
(defparameter mouse-event-script
"+ (e.clientX - e.target.getBoundingClientRect().left) + ':' +
(e.clientY - e.target.getBoundingClientRect().top) + ':' +
e.screenX + ':' + e.screenY + ':' + e.which + ':' + e.altKey + ':' +
@ -142,7 +142,7 @@ result. (Private)"))
;; parse-keyboard-event ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;
(defconstant keyboard-event-script
(defparameter keyboard-event-script
"+ e.keyCode + ':' + e.charCode + ':' + e.altKey + ':' + e.ctrlKey + ':'
+ e.shiftKey + ':' + e.metaKey")