[Emacs-diffs] Changes to emacs/lisp/progmodes/idlwave.el

[Werner LEMBERG]

Index: emacs/lisp/progmodes/idlwave.el
diff -c emacs/lisp/progmodes/idlwave.el:3.37 
emacs/lisp/progmodes/idlwave.el:3.38
*** emacs/lisp/progmodes/idlwave.el:3.37        Mon Mar 21 02:10:48 2005
--- emacs/lisp/progmodes/idlwave.el     Fri Mar 25 08:47:00 2005
***************
*** 1,5 ****
  ;; idlwave.el --- IDL editing mode for GNU Emacs
! ;; Copyright (c) 1999, 2000, 2001, 2002, 2003, 2004 Free Software Foundation
  
  ;; Authors: J.D. Smith <address@hidden>
  ;;          Carsten Dominik <address@hidden>
--- 1,6 ----
  ;; idlwave.el --- IDL editing mode for GNU Emacs
! ;; Copyright (c) 1999, 2000, 2001, 2002, 2003, 2004, 2005
! ;;  Free Software Foundation
  
  ;; Authors: J.D. Smith <address@hidden>
  ;;          Carsten Dominik <address@hidden>
***************
*** 5587,5593 ****
                      (symbolp what)
                      (assoc (symbol-name what) what-list))
                 what)
!               (t (error "Illegal WHAT"))))
         (nil-list '(nil nil nil nil))
         (class-list (list nil nil (or class t) nil)))
  
--- 5588,5594 ----
                      (symbolp what)
                      (assoc (symbol-name what) what-list))
                 what)
!               (t (error "Invalid WHAT"))))
         (nil-list '(nil nil nil nil))
         (class-list (list nil nil (or class t) nil)))
  
***************
*** 5656,5662 ****
       ((eq what 'class)
        (list nil-list nil-list 'class nil-list nil))
       
!      (t (error "Illegal value for WHAT")))))
  
  (defun idlwave-completing-read (&rest args)
    ;; Completing read, case insensitive
--- 5657,5663 ----
       ((eq what 'class)
        (list nil-list nil-list 'class nil-list nil))
       
!      (t (error "Invalid value for WHAT")))))
  
  (defun idlwave-completing-read (&rest args)
    ;; Completing read, case insensitive