projects / chise / xemacs-chise.git.1 / blobdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | inline | side by side
XEmacs 21.2.24 "Hecate".
[chise/xemacs-chise.git.1] / lisp / symbols.el
diff --git a/lisp/symbols.el b/lisp/symbols.el
index c965f6c..d359378 100644 (file)
--- a/lisp/symbols.el
+++ b/lisp/symbols.el
@@ -124,7 +124,7 @@ each of the handlers."
   (let ((event (apply getfun harg args)))
        (if (event-live-p event)
           nil
-        (setq event (allocate-event))
+        (setq event (make-event))
         (apply setfun harg event args))
        (character-to-event value event)))