(semantic--tag-link-list-to-buffer): Use mapc rather than mapcar

because the return value is never used.

2 files changed, 4 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 838ee2dd93a..e7cc04dd785 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2009-10-31  Glenn Morris  <rgm@gnu.org>
 
+        * cedet/semantic/tag.el (semantic--tag-link-list-to-buffer):
+        Use mapc rather than mapcar because the return value is never used.
+
         * cedet/srecode/template.el, cedet/semantic/wisent/javascript.el:
         * cedet/semantic/wisent/java-tags.el, cedet/semantic/texi.el:
         * cedet/semantic/html.el:
diff --git a/lisp/cedet/semantic/tag.el b/lisp/cedet/semantic/tag.el
index eb0d15181bf..6a59a793288 100644
--- a/lisp/cedet/semantic/tag.el
+++ b/lisp/cedet/semantic/tag.el
@@ -1135,7 +1135,7 @@ This function is for internal use only."
 (defsubst semantic--tag-link-list-to-buffer (tags)
   "Convert TAGS from using an overlay proxy to using an overlay.
 This function is for internal use only."
-  (mapcar 'semantic--tag-link-to-buffer tags))
+  (mapc 'semantic--tag-link-to-buffer tags))
 
 (defun semantic--tag-link-to-buffer (tag)
   "Convert TAG from using an overlay proxy to using an overlay.