commit/XEmacs: kehoea: Autoload within #'keymapp, as documented.

1 new commit in XEmacs: https://bitbucket.org/xemacs/xemacs/commits/236e4afc565d/ Changeset: 236e4afc565d User: kehoea Date: 2014-07-02 18:45:49 Summary: Autoload within #'keymapp, as documented. src/ChangeLog addition: 2014-07-02 Aidan Kehoe <kehoea(a)parhasard.net&gt; * keymap.c (Fkeymapp): Autoload within this, as documented. Our callers are not prepared to do the intelligent thing if a symbol that is fboundp to an autoloaded keymap, is not itself #'keymapp. lisp/ChangeLog addition: 2014-07-02 Aidan Kehoe <kehoea(a)parhasard.net&gt; * byte-optimize.el (side-effect-free-fns): #'keymapp is not side-effect-free, it can autoload. Affected #: 4 files diff -r 0e9f791cc6558e3dba92ffff659d331138f1431e -r 236e4afc565dcd32516d0946525c2c63397573c3 lisp/ChangeLog --- a/lisp/ChangeLog +++ b/lisp/ChangeLog ＠＠ -1,3 +1,8 ＠＠ +2014-07-02 Aidan Kehoe <kehoea(a)parhasard.net&gt; + + * byte-optimize.el (side-effect-free-fns): + #'keymapp is not side-effect-free, it can autoload. + 2014-07-02 Aidan Kehoe <kehoea(a)parhasard.net&gt; * cmdloop.el: diff -r 0e9f791cc6558e3dba92ffff659d331138f1431e -r 236e4afc565dcd32516d0946525c2c63397573c3 lisp/byte-optimize.el --- a/lisp/byte-optimize.el +++ b/lisp/byte-optimize.el ＠＠ -1340,7 +1340,7 ＠＠ hash-table-p identity ignore integerp integer-or-marker-p interactive-p invocation-directory invocation-name - keymapp list list* listp + list list* listp make-marker mark mark-marker markerp memory-limit minibuffer-window ;; mouse-movement-p not in XEmacs natnump nlistp not null number-or-marker-p numberp diff -r 0e9f791cc6558e3dba92ffff659d331138f1431e -r 236e4afc565dcd32516d0946525c2c63397573c3 src/ChangeLog --- a/src/ChangeLog +++ b/src/ChangeLog ＠＠ -1,3 +1,10 ＠＠ +2014-07-02 Aidan Kehoe <kehoea(a)parhasard.net&gt; + + * keymap.c (Fkeymapp): + Autoload within this, as documented. Our callers are not prepared + to do the intelligent thing if a symbol that is fboundp to an + autoloaded keymap, is not itself #'keymapp. + 2014-07-02 Aidan Kehoe <kehoea(a)parhasard.net&gt; * event-stream.c (Fnext_command_event): diff -r 0e9f791cc6558e3dba92ffff659d331138f1431e -r 236e4afc565dcd32516d0946525c2c63397573c3 src/keymap.c --- a/src/keymap.c +++ b/src/keymap.c ＠＠ -1008,7 +1008,7 ＠＠ (object)) { /* This function can GC */ - return KEYMAPP (get_keymap (object, 0, 0)) ? Qt : Qnil; + return KEYMAPP (get_keymap (object, 0, 1)) ? Qt : Qnil; } /* Check that OBJECT is a keymap (after dereferencing through any Repository URL: https://bitbucket.org/xemacs/xemacs/ -- This is a commit notification from bitbucket.org. You are receiving this because you have the service enabled, addressing the recipient of this email. _______________________________________________ XEmacs-Patches mailing list XEmacs-Patches(a)xemacs.org http://lists.xemacs.org/mailman/listinfo/xemacs-patches