# HG changeset patch # User Richard M. Stallman # Date 805123737 0 # Node ID df3f81ceb780783139ca6f06f2f2a963a9c7daf0 # Parent bf638e2849d5d2181b0e7149349bd541c80c29ca (find-dired): Undefine the g command. diff -r bf638e2849d5 -r df3f81ceb780 lisp/find-dired.el --- a/lisp/find-dired.el Fri Jul 07 13:27:15 1995 +0000 +++ b/lisp/find-dired.el Fri Jul 07 13:28:57 1995 +0000 @@ -77,6 +77,10 @@ (car find-ls-option))) ;; The next statement will bomb in classic dired (no optional arg allowed) (dired-mode dir (cdr find-ls-option)) + ;; This really should rerun the find command, but I don't + ;; have time for that. + (use-local-map (append (make-sparse-keymap) (current-local-map))) + (define-key (current-local-map) "g" 'undefined) ;; Set subdir-alist so that Tree Dired will work: (if (fboundp 'dired-simple-subdir-alist) ;; will work even with nested dired format (dired-nstd.el,v 1.15