summaryrefslogtreecommitdiff
path: root/lisp/cedet/srecode/srt-mode.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/cedet/srecode/srt-mode.el')
-rw-r--r--lisp/cedet/srecode/srt-mode.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/cedet/srecode/srt-mode.el b/lisp/cedet/srecode/srt-mode.el
index 660225925e0..0179929e7a9 100644
--- a/lisp/cedet/srecode/srt-mode.el
+++ b/lisp/cedet/srecode/srt-mode.el
@@ -511,7 +511,10 @@ section or ? for an ask variable."
(split-string (oref inserter secondname)
":")
nil)))
- (key (oref inserter key)))
+ (key (when (slot-exists-p inserter 'key)
+ ;; This avoids a compilation warning, but we
+ ;; know that 'key exists here.
+ (slot-value inserter (intern "key" obarray)))))
(cond ((null key)
;; A plain variable
(cons nil base))