[elpa] externals/auctex a2f8bc6 08/26: Fix Texinfo-make-node-list

[Tassilo Horn]

branch: externals/auctex
commit a2f8bc634c7cd3759b9121b2de53a44e95019155
Author: Tassilo Horn <address@hidden>
Commit: Tassilo Horn <address@hidden>

    Fix Texinfo-make-node-list
---
 tex-info.el |   13 +++++++++----
 1 files changed, 9 insertions(+), 4 deletions(-)

diff --git a/tex-info.el b/tex-info.el
index b987422..6c5c81f 100644
--- a/tex-info.el
+++ b/tex-info.el
@@ -337,10 +337,15 @@ commands. Return the resulting string."
                         (when (equal a b)
                           (push (cons a (line-number-at-pos (point))) dups)
                           t))))
-      (message "There are duplicate nodes:")
-      (dolist (dup (nreverse dups))
-       (message "    %s on line %d" (car dup) (cdr dup)))))
-  (nreverse nodes))
+      (when dups
+       (display-warning
+        'AUCTeX
+        (format "There are duplicate nodes:\n%s"
+                (mapconcat (lambda (dup)
+                             (format "    %s on line %d" (car dup) (cdr dup)))
+                           (nreverse dups)
+                           "\n"))))
+      (nreverse nodes))))
 
 (defun Texinfo-insert-node ()
   "Insert a Texinfo node in the current buffer.