# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1118933649 0
# Node ID c6c9f46490d0587586e8783ba106d8b2c9a4f60f
# Parent  9af9fa2b3a22b6750d26cb4ae2a07eff4ff1bc45
(idlwave-complete): Don't use `format' on `error' arguments.

diff -r 9af9fa2b3a22 -r c6c9f46490d0 lisp/progmodes/idlwave.el
--- a/lisp/progmodes/idlwave.el	Thu Jun 16 14:47:52 2005 +0000
+++ b/lisp/progmodes/idlwave.el	Thu Jun 16 14:54:09 2005 +0000
@@ -1369,7 +1369,7 @@
 ;; Note that this is documented in the v18 manuals as being a string
 ;; of length one rather than a single character.
 ;; The code in this file accepts either format for compatibility.
-(defvar idlwave-comment-indent-char ?\ 
+(defvar idlwave-comment-indent-char ?\
   "Character to be inserted for IDL comment indentation.
 Normally a space.")
 
@@ -5493,8 +5493,8 @@
 	  (error "Nothing known about procedure %s"
 		 (idlwave-make-full-name class name)))
 	(setq list (idlwave-fix-keywords name 'pro class list super-classes))
-	(unless list (error (format "No keywords available for procedure %s"
-				    (idlwave-make-full-name class name))))
+	(unless list (error "No keywords available for procedure %s"
+                            (idlwave-make-full-name class name)))
 	(setq idlwave-completion-help-info
 	      (list 'keyword name type-selector class-selector entry super-classes))
 	(idlwave-complete-in-buffer
@@ -5531,8 +5531,8 @@
 			   (concat idlwave-current-obj_new-class
 				   "::Init (via OBJ_NEW)")
 			 (idlwave-make-full-name class name)))
-	(unless list (error (format "No keywords available for function %s"
-				    msg-name)))
+	(unless list (error "No keywords available for function %s"
+                            msg-name))
 	(setq idlwave-completion-help-info
 	      (list 'keyword name type-selector class-selector nil super-classes))
 	(idlwave-complete-in-buffer