aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/progmodes/idlwave.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/progmodes/idlwave.el b/lisp/progmodes/idlwave.el
index 0556c87b43d..cf518b17d94 100644
--- a/lisp/progmodes/idlwave.el
+++ b/lisp/progmodes/idlwave.el
@@ -4342,7 +4342,7 @@ catalog \('lib).")
4342(defvar idlwave-true-path-alist nil 4342(defvar idlwave-true-path-alist nil
4343 "Like `idlwave-path-alist', but with true filenames.") 4343 "Like `idlwave-path-alist', but with true filenames.")
4344(defvar idlwave-routines nil 4344(defvar idlwave-routines nil
4345 "Holds the combinded procedure/function/method routine-info.") 4345 "Holds the combined procedure/function/method routine-info.")
4346(defvar idlwave-class-alist nil 4346(defvar idlwave-class-alist nil
4347 "Holds the class names known to IDLWAVE.") 4347 "Holds the class names known to IDLWAVE.")
4348(defvar idlwave-class-history nil 4348(defvar idlwave-class-history nil
@@ -4846,7 +4846,7 @@ Gets set in cached XML rinfo, or `idlw-rinfo.el'.")
4846 ;; Create a sysvar list entry from the xml parsed list. 4846 ;; Create a sysvar list entry from the xml parsed list.
4847 (let* ((nameblock (nth 1 xml-entry)) 4847 (let* ((nameblock (nth 1 xml-entry))
4848 (name (cdr (assq 'name nameblock))) 4848 (name (cdr (assq 'name nameblock)))
4849 (sysvar (substring name (progn (string-match "^ *!" name) 4849 (sysvar (substring name (progn (string-match "^ *!" name)
4850 (match-end 0)))) 4850 (match-end 0))))
4851 (link (cdr (assq 'link nameblock))) 4851 (link (cdr (assq 'link nameblock)))
4852 (params (cddr xml-entry)) 4852 (params (cddr xml-entry))