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>
* 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>
* 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>
+
+ * 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>
* 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>
+
+ * 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>
* 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