 		      (if (current-word t t)
 			  (format "Enter service name (default %s): " (current-word t t))
 			"Enter service name: ")
-		      service-completor nil nil (current-word t t))))
+		      service-completor nil nil nil nil (current-word t t))))
   (let ((p (ros-service-package service)))
     (if p
 	(let ((dir (ros-package-dir p)))

		      (if (current-word t t)
			  (format "Enter service name (default %s): " (current-word t t))
			"Enter service name: ")
		      service-completor nil nil (current-word t t))))
  (let ((p (ros-service-package service)))
    (if p
	(let ((dir (ros-package-dir p)))

;; 2. (Optional) From emacs do M-x byte-compile followed by 
;;    this file's full path 
;;
;; 3. Add the following lines to your .emacs
;;    (add-to-list 'load-path "/path/to/rosemacs")
;;    (require 'rosemacs)
;;    (invoke-rosemacs)
;;
;; 4. (Optional) Add the following line or equivalent to 
;;    .emacs to activate keyboard shortcuts for the added 
;;    commands (\C-x\C-r means control-x control-r):
;;    (global-set-key "\C-x\C-r" ros-keymap)
;;
;; 5. (Optional) Add the following line or equivalent to 
