Mercurial > emacs

changeset 63494:c6c9f46490d0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(idlwave-complete): Don't use `format' on `error' arguments.
author Juanma Barranquero <lekktu@gmail.com>
date Thu, 16 Jun 2005 14:54:09 +0000
parents 9af9fa2b3a22
children 91a6c1b5b3c4
files lisp/progmodes/idlwave.el
diffstat 1 files changed, 5 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- 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