 \\{rdebug-example-map-eclipse}"
   ;;(define-key map []  'gud-cont)
   ;;(define-key map []  'rdebug-quit)
-  (define-key map [S-C-b]    'gud-break) ; TODO: Should be "toggle"
-  (define-key map [f6]   'gud-next)
-  (define-key map [f5]   'gud-step)
-  (define-key map [f7] 'gud-finish))
+  (define-key map [S-C-b] 'rdebug-toggle-source-breakpoint)
+  (define-key map [f6]    'gud-next)
+  (define-key map [f5]    'gud-step)
+  (define-key map [f7]    'gud-finish))
 
 
 ;; TODO: Verify and complement.

  (if (yes-or-no-p "Really quit? ")
      (gud-call "quit unconditionally")))


(provide 'rdebug-core)

    (define-key map [menu-bar debugger] (cons "Debugger" menu))

    (define-key menu [break-delete]
      (rdebug-menu-item common-map "Enable/disable breakpoint"
                        'rdebug-toggle-source-breakpoint-enabled
                        :enable '(get-buffer-process gud-comint-buffer)))

    (define-key menu [break]
      (rdebug-menu-item common-map "Toggle breakpoint"
                        'rdebug-toggle-source-breakpoint
                        :enable '(get-buffer-process gud-comint-buffer)))

    (define-key menu [finish]
