   (setq page-delimiter "SUMMARY")
   )
 
-
+(setq ros-launch-mode-hook 'ansi-color-for-comint-mode-on)
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; Event buffer

                buf)))
	(error "Did not find %s in the ros package list." package-name)))))

(defun rosemacs/open-launch-file ()
  (interactive)
  (unless ros-launch-path

      (save-excursion
        (set-buffer buf)
        (erase-buffer)
        (let ((proc (start-process (buffer-name buf) buf "roslaunch" ros-launch-path)))
          (set-process-filter proc 'comint-output-filter))
        (rosemacs/add-event (format "Ros launch of %s" ros-launch-path))))))

(defun rosemacs/kill-and-relaunch ()
  "Interrupt the current roslaunch process, and when it has terminated, relaunch."
