Mercurial > emacs

changeset 86530:bc8f1a009d53

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(edt-user-emulation-setup): Test edt-setup-user-bindings is bound before calling.
author Glenn Morris <rgm@gnu.org>
date Wed, 28 Nov 2007 03:57:52 +0000
parents 6116ad9615de
children da67dc2c4510
files lisp/emulation/edt.el
diffstat 1 files changed, 4 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emulation/edt.el	Wed Nov 28 03:57:08 2007 +0000
+++ b/lisp/emulation/edt.el	Wed Nov 28 03:57:52 2007 +0000
@@ -2229,7 +2229,10 @@
   ;; function edt-setup-extra-default-bindings.
   (define-prefix-command 'edt-user-gold-map)
   (fset 'edt-user-gold-map (copy-keymap 'edt-default-gold-map))
-  (edt-setup-user-bindings)
+  ;; This is a function that the user can define for custom bindings.
+  ;; See etc/edt-user.doc.
+  (if (fboundp 'edt-setup-user-bindings)
+      (edt-setup-user-bindings))
   (edt-select-user-global-map))
 
 (defun edt-select-default-global-map()