* cedet/srecode/compile.el (srecode-compile-split-code)

(srecode-compile-parse-inserter): Fix compiler warning.

1 files changed, 2 insertions, 1 deletions

diff --git a/lisp/cedet/srecode/compile.el b/lisp/cedet/srecode/compile.el
index f744b052162..769c0137e68 100644
--- a/lisp/cedet/srecode/compile.el
+++ b/lisp/cedet/srecode/compile.el
@@ -393,7 +393,7 @@ If END-NAME is specified, and the input string"
                                  (match-end 0)))
                (namestart (match-end 0))
                (junk (string-match regexend what namestart))
-               end tail name)
+               end tail name key)
           ;; Add string to compiled output
           (when (> (length prefix) 0)
             (setq comp (cons prefix comp)))
@@ -462,6 +462,7 @@ If END-NAME is specified, and the input string"
   "Parse the inserter TXT with the current STATE.
 Return an inserter object."
   (let ((key (aref txt 0))
+        name
         )
     (if (and (or (< key ?A) (> key ?Z))
              (or (< key ?a) (> key ?z)) )