From: Eric Ludlam <eric@siege-engine.com>
Date: Mon, 26 Jan 2015 23:12:12 +0000 (-0500)
Subject: semantic: Fix current symbol info
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fa84466d79788b0604ca66be7188d94d4b3d5a2c;p=emacs.git

semantic: Fix current symbol info

* lisp/cedet/semantic/bovine/c.el
  (semantic-idle-summary-current-symbol-info): The macro symbol value
  might be a string, so support that.
---

diff --git a/lisp/cedet/semantic/bovine/c.el b/lisp/cedet/semantic/bovine/c.el
index 47a54579956..7ec8010867b 100644
--- a/lisp/cedet/semantic/bovine/c.el
+++ b/lisp/cedet/semantic/bovine/c.el
@@ -2041,10 +2041,12 @@ have to be wrapped in that namespace."
 	    (setq sv (cdr sv)))
 
 	  ;; This is optional, and potentially fraught w/ errors.
-	  (condition-case nil
-	      (dolist (lt sv)
-		(setq txt (concat txt " " (semantic-lex-token-text lt))))
-	    (error (setq txt (concat txt "  #error in summary fcn"))))
+	  (if (stringp sv)
+	      (setq txt (concat txt " " sv))
+	    (condition-case nil
+		(dolist (lt sv)
+		  (setq txt (concat txt " " (semantic-lex-token-text lt))))
+	      (error (setq txt (concat txt "  #error in summary fcn")))))
 
 	  txt)
       (semantic-idle-summary-current-symbol-info-default))))