Re: [Ilisp-help] Re: bug in xemacs ilisp module

"Clementson, Bill" <[email protected]> writes:

> > BTW, unrelated, do I remember right that ILISP rebinds C-r 
> > (reverse incremental search) with fsf-compliant-keybindings?  
> 
> No, it doesn not rebind C-r with fsf-compliant-keybindings

Well, I see that I frobbed this to not bind C-r, and it doesn't seem
to have changed in CVS since then.  And I found that M-. and M-, also
overwrite useful standard Emacs bindings.

--- ilisp-key.el.~1.9.~	Mon Jun 23 19:11:53 2003
+++ ilisp-key.el	Fri Jun 27 21:02:39 2003
@@ -121,7 +121,7 @@
 
   (define-key   keymap "\M-\C-a"  'beginning-of-defun-lisp)
   (define-key   keymap "\M-\C-e"  'end-of-defun-lisp)
-  (ilisp-safe-define-key keymap "\C-\M-r" 'reposition-window-lisp "\C-r")
+  (ilisp-safe-define-key keymap "\C-\M-r" 'reposition-window-lisp)
 
   ;; This series of bindings was very non-FSF-compliant, but was also
   ;; hard to fit into any consistent binding scheme.  I saved them for
@@ -133,8 +133,8 @@
   (ilisp-bind-ilisp-key-for-map keymap "m" 'macroexpand-1-lisp "\C-bk")
   (ilisp-bind-ilisp-key-for-map keymap "M" 'macroexpand-lisp   "\C-b\C-k")
 
-  (ilisp-safe-define-key keymap "\M-," 'next-definition-lisp "\M-,")
-  (ilisp-safe-define-key keymap "\M-." 'edit-definitions-lisp "\M-.")
+  (ilisp-safe-define-key keymap "\M-," 'next-definition-lisp "\C-c,")
+  (ilisp-safe-define-key keymap "\M-." 'edit-definitions-lisp "\C-c.")
   (ilisp-safe-define-key keymap "\M-?" 'search-lisp "\C-c\C-v\C-s")
   (ilisp-safe-define-key keymap "\M-\"" 'replace-lisp "\C-c\C-v\C-r")
   (ilisp-bind-ilisp-key-for-map keymap "^" 'edit-callers-lisp "\C-v\C-e")