     (define-key map [mouse-2] 'rdebug-goto-breakpoint-mouse)
     (define-key map [mouse-3] 'rdebug-goto-breakpoint-mouse)
     (define-key map "t" 'rdebug-toggle-breakpoint)
-    ; Numbers are adjusted to offset the header line.
-    (define-key map "1" 'rdebug-goto-entry-2)
-    (define-key map "2" 'rdebug-goto-entry-3)
-    (define-key map "3" 'rdebug-goto-entry-4)
-    (define-key map "4" 'rdebug-goto-entry-5)
-    (define-key map "5" 'rdebug-goto-entry-6)
-    (define-key map "6" 'rdebug-goto-entry-7)
-    (define-key map "7" 'rdebug-goto-entry-8)
-    (define-key map "8" 'rdebug-goto-entry-9)
-    (define-key map "9" 'rdebug-goto-entry-10)
-    (define-key map "0" 'rdebug-goto-entry-11)
+    (rdebug-populate-digit-keys map)
     (define-key map [(control m)] 'rdebug-goto-breakpoint)
     (define-key map [?d] 'rdebug-delete-breakpoint)
     (rdebug-populate-secondary-buffer-map map)


;; -- The debugger

(defun rdebug-goto-entry-1 ()
  "Go to entry number 1. 
Used internally as a convenience go to this entry of a stack, display, or breakpoint buffer."
  (interactive)
  (goto-line 1))

(defun rdebug-goto-entry-2 ()
  "Go to entry number 2. 
Used internally as a convenience go to this entry of a stack, display, or breakpoint buffer."
  (interactive)
  (goto-line 2))

(defun rdebug-goto-entry-3 ()
  "Go to entry number 3. 
Used internally as a convenience go to this entry of a stack, display, or breakpoint buffer."
  (interactive)
  (goto-line 3))

(defun rdebug-goto-entry-4 ()
  "Go to entry number 4. 
Used internally as a convenience go to this entry of a stack, display, or breakpoint buffer."
  (interactive)
  (goto-line 4))

(defun rdebug-goto-entry-5 ()
  "Go to entry number 5. 
Used internally as a convenience go to this entry of a stack, display, or breakpoint buffer."
  (interactive)
  (goto-line 5))

(defun rdebug-goto-entry-6 ()
  "Go to entry number 6. 
Used internally as a convenience go to this entry of a stack, display, or breakpoint buffer."
  (interactive)
  (goto-line 6))

(defun rdebug-goto-entry-7 ()
  "Go to entry number 7. 
Used internally as a convenience go to this entry of a stack, display, or breakpoint buffer."
  (interactive)
  (goto-line 7))

(defun rdebug-goto-entry-8 ()
  "Go to entry number 8. 
Used internally as a convenience go to this entry of a stack, display, or breakpoint buffer."
  (interactive)
  (goto-line 8))

(defun rdebug-goto-entry-9 ()
  "Go to entry number 9. 
Used internally as a convenience go to this entry of a stack, display, or breakpoint buffer."
  (interactive)
  (goto-line 9))

(defun rdebug-goto-entry-10 ()
  "Go to entry number 10. 
Used internally as a convenience go to this entry of a stack, display, or breakpoint buffer."
  (interactive)
  (goto-line 10))

(defun rdebug-goto-entry-11 ()
  "Go to entry number 11. 
Used internally as a convenience go to this entry of a stack, display, or breakpoint buffer."
  (interactive)
  (goto-line 10))

;; have to bind rdebug-file-queue before installing the kill-emacs-hook
(defvar rdebug-file-queue nil

    (define-key map [mouse-2] 'rdebug-goto-stack-frame-mouse)
    (define-key map [mouse-3] 'rdebug-goto-stack-frame-mouse)
    (define-key map [(control m)] 'rdebug-goto-stack-frame)
    (rdebug-populate-digit-keys map)
    (rdebug-populate-secondary-buffer-map map)

    ;; --------------------
