branch: externals/idlwave
commit fb56e84de1687c8f194d30b78bcbaf42afc25133
Author: JD Smith <[email protected]>
Commit: JD Smith <[email protected]>
Don't assume last-system-routine-info-cons-cell is set.
---
idlwave.el | 11 ++++++-----
1 file changed, 6 insertions(+), 5 deletions(-)
diff --git a/idlwave.el b/idlwave.el
index c4c008d78a..ce93c0cd55 100644
--- a/idlwave.el
+++ b/idlwave.el
@@ -5145,11 +5145,12 @@ Cache to disk for quick recovery."
;; The sequence here is important because earlier definitions shadow
;; later ones. We assume that if things in the buffers are newer
;; then in the shell of the system, they are meant to be different.
- (setcdr idlwave-last-system-routine-info-cons-cell
- (append idlwave-buffer-routines
- idlwave-compiled-routines
- idlwave-library-catalog-routines
- idlwave-user-catalog-routines))
+ (if (consp idlwave-last-system-routine-info-cons-cell)
+ (setcdr idlwave-last-system-routine-info-cons-cell
+ (append idlwave-buffer-routines
+ idlwave-compiled-routines
+ idlwave-library-catalog-routines
+ idlwave-user-catalog-routines)))
(setq idlwave-class-alist nil)
;; Give a message with information about the number of routines we have.
