diff options
| author | Richard M. Stallman | 2004-05-22 21:50:03 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2004-05-22 21:50:03 +0000 |
| commit | fe93c80378e9b44b4853374e1450b526a1f1e33e (patch) | |
| tree | a6701be635b945c453f40a57e667719f0985a285 | |
| parent | 657cc4ff9a845a161cdb9c8018e6b4b189ebd2d1 (diff) | |
| download | emacs-fe93c80378e9b44b4853374e1450b526a1f1e33e.tar.gz emacs-fe93c80378e9b44b4853374e1450b526a1f1e33e.zip | |
(idlwave-shell-get-object-class): Use assoc-string, not assoc-ignore-case.
| -rw-r--r-- | lisp/progmodes/idlw-shell.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/progmodes/idlw-shell.el b/lisp/progmodes/idlw-shell.el index a600939ef71..ae0c43c2730 100644 --- a/lisp/progmodes/idlw-shell.el +++ b/lisp/progmodes/idlw-shell.el | |||
| @@ -1823,8 +1823,8 @@ Change the default directory for the process buffer to concur." | |||
| 1823 | 'hide 'wait) | 1823 | 'hide 'wait) |
| 1824 | ;; If we don't know anything about the class, update shell routines | 1824 | ;; If we don't know anything about the class, update shell routines |
| 1825 | (if (and idlwave-shell-get-object-class | 1825 | (if (and idlwave-shell-get-object-class |
| 1826 | (not (assoc-ignore-case idlwave-shell-get-object-class | 1826 | (not (assoc-string idlwave-shell-get-object-class |
| 1827 | (idlwave-class-alist)))) | 1827 | (idlwave-class-alist) t))) |
| 1828 | (idlwave-shell-maybe-update-routine-info)) | 1828 | (idlwave-shell-maybe-update-routine-info)) |
| 1829 | idlwave-shell-get-object-class))) | 1829 | idlwave-shell-get-object-class))) |
| 1830 | 1830 | ||