1823 |
'hide 'wait) |
'hide 'wait) |
1824 |
;; If we don't know anything about the class, update shell routines |
;; If we don't know anything about the class, update shell routines |
1825 |
(if (and idlwave-shell-get-object-class |
(if (and idlwave-shell-get-object-class |
1826 |
(not (assoc-ignore-case idlwave-shell-get-object-class |
(not (assoc-string idlwave-shell-get-object-class |
1827 |
(idlwave-class-alist)))) |
(idlwave-class-alist) t))) |
1828 |
(idlwave-shell-maybe-update-routine-info)) |
(idlwave-shell-maybe-update-routine-info)) |
1829 |
idlwave-shell-get-object-class))) |
idlwave-shell-get-object-class))) |
1830 |
|
|