[Emacs-diffs] Changes to emacs/lisp/tutorial.el,v

[Miles Bader]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Miles Bader <miles>     07/07/24 01:21:33

Index: lisp/tutorial.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/tutorial.el,v
retrieving revision 1.18
retrieving revision 1.19
diff -u -b -r1.18 -r1.19
--- lisp/tutorial.el    13 Jun 2007 00:06:00 -0000      1.18
+++ lisp/tutorial.el    24 Jul 2007 01:21:29 -0000      1.19
@@ -431,11 +431,17 @@
               (def-fun (nth 0 kdf))
               (def-fun-txt (format "%s" def-fun))
               (rem-fun (command-remapping def-fun))
+              ;; Handle prefix definitions specially
+              ;; so that a mode that rebinds some subcommands
+              ;; won't make it appear that the whole prefix is gone.
               (key-fun (if (eq def-fun 'ESC-prefix)
                            (lookup-key global-map [27])
-                         (key-binding key)))
+                         (if (eq def-fun 'Control-X-prefix)
+                             (lookup-key global-map [24])
+                           (key-binding key))))
               (where (where-is-internal (if rem-fun rem-fun def-fun)))
               cwhere)
+
          (if where
              (progn
                (setq cwhere (car where)