# HG changeset patch # User Miles Bader # Date 1016096556 0 # Node ID afe64ec4637c038bfd23a601de89ec7d951769b2 # Parent 0756d747f1af486567a38c715e5a708f9ea17c72 Require `button'. (debugger-mode-map): Set the parent keymap to `button-buffer-map', to get TAB and bindings. diff -r 0756d747f1af -r afe64ec4637c lisp/emacs-lisp/debug.el --- a/lisp/emacs-lisp/debug.el Thu Mar 14 09:02:11 2002 +0000 +++ b/lisp/emacs-lisp/debug.el Thu Mar 14 09:02:36 2002 +0000 @@ -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 @@ (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)