Remove obsolete name arg from two constructors

* lisp/cedet/semantic/grammar.el
(semantic-analyze-current-context): Remove obsolete name arg.

* lisp/cedet/srecode/insert.el (srecode--insert-into-buffer): Ditto.

diff --git a/lisp/cedet/semantic/grammar.el b/lisp/cedet/semantic/grammar.el
index 0db675b8f23d009c2ac3f50ae867c87b947e37e2..8ffa4c6d83edfa21c3f46b4e784b4e7313ade0bb 100644 (file)
--- a/lisp/cedet/semantic/grammar.el
+++ b/lisp/cedet/semantic/grammar.el
@@ -1898,7 +1898,6 @@ Optional argument COLOR determines if color is added to the text."
 
       (setq context-return
            (semantic-analyze-context
-            "context-for-semantic-grammar"
             :buffer (current-buffer)
             :scope nil
             :bounds bounds

diff --git a/lisp/cedet/srecode/insert.el b/lisp/cedet/srecode/insert.el
index 5eb2edd067f74eb4bcb70c5d76e198441c1446c6..966cd485e8203e279a890e746af0e113e4a8ad0a 100644 (file)
--- a/lisp/cedet/srecode/insert.el
+++ b/lisp/cedet/srecode/insert.el
@@ -183,8 +183,7 @@ Buffer based features related to change hooks is handled one level up."
               )
       (let ((reg
             ;; Create the field-driven editable area.
-            (srecode-template-inserted-region
-             "TEMPLATE" :start start :end (point))))
+            (srecode-template-inserted-region :start start :end (point))))
        (srecode-overlaid-activate reg))
       )
     ;; We return with 'point being the end of the template insertion