(gnus-articles-to-read, gnus-summary-insert-old-articles): Don't

truncate group name for `read-string'.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b25e9e5..42a2ff7 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2007-05-12  Micha\e,Ak\e(Bl Cadilhac  <michael@cadilhac.name>
+
+       * gnus-sum.el (gnus-articles-to-read)
+       (gnus-summary-insert-old-articles): Don't truncate group name for
+       `read-string'.
+
 2007-05-11  Micha\e,Ak\e(Bl Cadilhac  <michael@cadilhac.name>
 
        * gnus-sum.el (gnus-summary-next-group-on-exit): New variable.  Tell if, on

diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index d738d95..556421a 100644 (file)
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -5664,9 +5664,7 @@ If SELECT-ARTICLES, only select those articles from GROUP."
                          (read-string
                           (format
                            "How many articles from %s (%s %d): "
-                           (gnus-limit-string
-                            (gnus-group-decoded-name gnus-newsgroup-name)
-                            35)
+                           (gnus-group-decoded-name gnus-newsgroup-name)
                            (if initial "max" "default")
                            number)
                           (if initial
@@ -12291,8 +12289,7 @@ If ALL is a number, fetch this number of articles."
                      (read-string
                       (format
                        "How many articles from %s (%s %d): "
-                       (gnus-limit-string
-                        (gnus-group-decoded-name gnus-newsgroup-name) 35)
+                       (gnus-group-decoded-name gnus-newsgroup-name)
                        (if initial "max" "default")
                        len)
                       (if initial