diff options
| -rw-r--r-- | wheelwork.lisp | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/wheelwork.lisp b/wheelwork.lisp index a9f93bf..d0982cb 100644 --- a/wheelwork.lisp +++ b/wheelwork.lisp @@ -58,8 +58,6 @@ order). Makes sure to remove the unit from its current container if necessary." (keyword (intern (symbol-name handler-or-event-type) :wheelwork)) (symbol (intern (symbol-name handler-or-event-type) :wheelwork)) (event-handler (event-type handler-or-event-type))))) - (print (list :event-type event-type - :pacakge (symbol-package event-type))) (setf (slot-value (listener interactive) event-type) nil) (remhash interactive (listener-table-for (listener interactive) event-type))))) |