   ;;(define-key map []  'rdebug-quit)
   ;; F4 - Run to cursor.
   (define-key map [S-f8]   'rdebug-toggle-source-breakpoint)
-  (define-key map [f8]     'gud-next)
-  (define-key map [f7]     'gud-step)
+  (define-key map [f8]     'rdebug-next)
+  (define-key map [f7]     'rdebug-step)
   (define-key map [M-S-f7] 'gud-finish))
 
 

     ;; found script name (or nil
     (t (list arg annotate-p)))))

;; From Emacs 23
(unless (fboundp 'split-string-and-unquote)
  (defun split-string-and-unquote (string &optional separator)

  (define-key map [S-f5]  'rdebug-quit)
  (define-key map [f9]    'rdebug-toggle-source-breakpoint)
  (define-key map [C-f9]  'rdebug-toggle-source-breakpoint-enabled)
  (define-key map [f10]   'rdebug-next)
  (define-key map [f11]   'rdebug-step)
  (define-key map [S-f11] 'gud-finish))


