Gnus -- minor build / warning fixes [OK For Upstream]

[gnus] / lisp / gnus.el

diff --git a/lisp/gnus.el b/lisp/gnus.el
index 19807fc..8987510 100644 (file)
--- a/lisp/gnus.el
+++ b/lisp/gnus.el
@@ -3995,7 +3995,7 @@ If SCORE is nil, add 1 to the score of GROUP."
   "Collapse GROUP name LEVELS.
 Select methods are stripped and any remote host name is stripped down to
 just the host name."
-  (let* ((name "")
+  (let* (;; (name "") -- unused? --SY.
         (foreign "")
         (depth 0)
         (skip 1)