   :keymap ros-topic-echo-keymap
   (message "ros-run mode: k to stop, q to quit"))
 
+
 (defun ros-run (pkg exec &rest args)
   "pkg is a ros package name and exec is the executable name.  Tab completes package name.  Exec defaults to package name itself."
   (interactive (list (setq ros-run-temp-var (ros-completing-read-package

    (cache-ros-service-locations))
  (rosemacs-lookup-vectors m ros-services ros-service-packages))

(defun ros-package-for-path (path)
  (let ((path (cond ((file-directory-p path)
                     (directory-file-name path))
                    ((file-exists-p path)
                     (directory-file-name (file-name-directory path)))
                    (t nil))))
    (catch 'done

(define-key ros-keymap "H" 'remove-hz-update)
(define-key ros-keymap "T" 'ros-topic-info)
(define-key ros-keymap "g" 'ros-rgrep-package)
(define-key ros-keymap "\C-l" 'ros-launch)


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
