summaryrefslogtreecommitdiff
path: root/lisp/progmodes/ada-mode.el
diff options
context:
space:
mode:
authorStephen Leake <stephen_leake@member.fsf.org>2010-01-14 13:57:07 +0100
committerJuanma Barranquero <lekktu@gmail.com>2010-01-14 13:57:07 +0100
commit80e18d20ec6a73b417c9ec4d18e433d1cff5a95f (patch)
tree8ba2b60dc5c93d4a8d261dbb59389723bd13e831 /lisp/progmodes/ada-mode.el
parentfb0d15459ca0a197330e6131526613d04a56c12a (diff)
downloademacs-80e18d20ec6a73b417c9ec4d18e433d1cff5a95f.tar.gz
* progmodes/ada-mode.el: Override `narrow-to-defun' with `ada-narrow-to-defun'.
Diffstat (limited to 'lisp/progmodes/ada-mode.el')
-rw-r--r--lisp/progmodes/ada-mode.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/progmodes/ada-mode.el b/lisp/progmodes/ada-mode.el
index b25e54018fa..2b94fdb25ff 100644
--- a/lisp/progmodes/ada-mode.el
+++ b/lisp/progmodes/ada-mode.el
@@ -4568,6 +4568,8 @@ Moves to 'begin' if in a declarative part."
(define-key ada-mode-extra-map "u" 'ada-prj-edit)
+ (define-key ada-mode-map "\C-xnd" 'ada-narrow-to-defun); override narrow-to-defun
+
;; The templates, defined in ada-stmt.el
(let ((map (make-sparse-keymap)))