[Emacs-diffs] master c90fc19 6/6: Suppress compilation warning in srt-mode

[Lars Ingebrigtsen]

branch: master
commit c90fc19c6ca27c2e280c5f0cdc0e2299c033f355
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    Suppress compilation warning in srt-mode
    
    * lisp/cedet/srecode/srt-mode.el (srecode-parse-this-macro): Check
    for the existence of `key' in the macro before using it, and
    suppress the warning.
---
 lisp/cedet/srecode/srt-mode.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/lisp/cedet/srecode/srt-mode.el b/lisp/cedet/srecode/srt-mode.el
index 6602259..0179929 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))