 (require 'cl)
 (require 'warnings)
 (require 'time-stamp)
+(require 'ansi-color)
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; Parameters

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

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

              (let ((buf (get-buffer-create name)))
                (save-excursion
                  (set-buffer buf)
                  (comint-mode)
                  (setq ros-launch-path path)
                  (setq ros-launch-filename dir-suffix)
                  (ros-launch-mode 1)
