 (define-key ros-topic-list-keymap [?\r] 'echo-current-topic)
 (define-key ros-topic-list-keymap [?h] 'hz-current-topic)
 (define-key ros-topic-list-keymap [?H] 'unhz-current-topic)
+(define-key ros-topic-list-keymap [?i] 'ros-topic-info)
 
 (defun hz-current-topic ()
   (interactive)


(setq message-completor (dynamic-completion-table (lambda (str) (unless ros-messages (cache-ros-message-locations)) (bsearch-completions str ros-messages))))
(setq service-completor (dynamic-completion-table (lambda (str) (unless ros-services (cache-ros-service-locations)) (bsearch-completions str ros-services))))
(setq topic-completor (dynamic-completion-table (lambda (str) (bsearch-completions str ros-topic-completions))))
(setq ros-package-completor 
      ;; Longer because it has to deal with the case of PACKAGE/PATH-PREFIX in addition to PACKAGE-PREFIX
      (dynamic-completion-table 

    (terpri ros-topic-buffer))

  (princ (format "\nTopic, #pubs, #subs\n\n") ros-topic-buffer)
  (dotimes (i (length ros-all-topics))
    (let ((topic (aref ros-all-topics i)))
      (princ (format " %s %s %s" topic (gethash topic ros-num-publishers 0) (gethash topic ros-num-subscribers 0)) ros-topic-buffer)
      (terpri ros-topic-buffer))))



