Require `button'.

(debugger-mode-map): Set the parent keymap to `button-buffer-map',
to get TAB and <backtab> bindings.
This commit is contained in:
Miles Bader 2002-03-14 09:02:36 +00:00
parent afcdd7bd28
commit bb9a622e93

View file

@ -1,6 +1,6 @@
;;; debug.el --- debuggers and related commands for Emacs
;; Copyright (C) 1985, 1986, 1994 Free Software Foundation, Inc.
;; Copyright (C) 1985, 1986, 1994, 2001 Free Software Foundation, Inc.
;; Maintainer: FSF
;; Keywords: lisp, tools, maint
@ -28,6 +28,8 @@
;;; Code:
(require 'button)
(defgroup debugger nil
"Debuggers and related commands for Emacs."
:prefix "debugger-"
@ -526,6 +528,7 @@ Applies to the frame whose line point is on in the backtrace."
(unless debugger-mode-map
(let ((loop ? ))
(setq debugger-mode-map (make-keymap))
(set-keymap-parent debugger-mode-map button-buffer-map)
(suppress-keymap debugger-mode-map)
(define-key debugger-mode-map "-" 'negative-argument)
(define-key debugger-mode-map "b" 'debugger-frame)