Commit a8efdd4c authored by Eric Abrahamsen's avatar Eric Abrahamsen

Handle multiple possible types for Gnus group names

* lisp/gnus/gnus-start.el (gnus-active-to-gnus-format): Numbers,
  symbols, and strings.
parent 6d0f7f70
......@@ -2145,9 +2145,12 @@ The info element is shared with the same element of
(condition-case ()
(if (and (stringp (progn
(setq group (read cur)
group (if (numberp group)
(number-to-string group)
(symbol-name group)))))
group (cond ((numberp group)
(number-to-string group))
((symbolp group)
(symbol-name group))
((stringp group)
group)))))
(numberp (setq max (read cur)))
(numberp (setq min (read cur)))
(null (progn
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment