 
 (defvar ros-launch-keymap (make-sparse-keymap))
 (define-key ros-launch-keymap "k" 'rosemacs/interrupt-process)
-(define-key ros-launch-keymap "q" 'kill-current-buffer)
+(define-key ros-launch-keymap "q" 'rosemacs/kill-process-buffer)
 (define-key ros-launch-keymap "r" 'rosemacs/relaunch-current-process)
 
 

      (re-search-forward "^\\(.*\\)$")
      (match-string 1))))

(define-minor-mode ros-run-mode
  "Mode used for rosrun



(defvar ros-run-temp-var "")
(defvar ros-run-exec-names nil)
(defvar ros-run-pkg nil "Package of the executable being rosrun")
(make-variable-buffer-local 'ros-run-pkg)
(defvar ros-run-executable nil "Executable being rosrun")
(make-variable-buffer-local 'ros-run-executable)
(defvar ros-run-args nil "Arguments to current rosrun")
(make-variable-buffer-local 'ros-run-args)

(defun extract-exec-name (path)
  (string-match "\\([^\/]+\\)$" path)
