Index: lisp/gnus-sum.el
===================================================================
RCS file: /usr/local/cvsroot/gnus/lisp/gnus-sum.el,v
retrieving revision 7.182
diff -c -r7.182 gnus-sum.el
*** lisp/gnus-sum.el	27 Apr 2007 08:39:17 -0000	7.182
--- lisp/gnus-sum.el	8 May 2007 13:17:41 -0000
***************
*** 5634,5642 ****
  			  (read-string
  			   (format
  			    "How many articles from %s (%s %d): "
! 			    (gnus-limit-string
! 			     (gnus-group-decoded-name gnus-newsgroup-name)
! 			     35)
  			    (if initial "max" "default")
  			    number)
  			   (if initial
--- 5634,5640 ----
  			  (read-string
  			   (format
  			    "How many articles from %s (%s %d): "
! 			    (gnus-group-decoded-name gnus-newsgroup-name)
  			    (if initial "max" "default")
  			    number)
  			   (if initial
***************
*** 12245,12252 ****
  		      (read-string
  		       (format
  			"How many articles from %s (%s %d): "
! 			(gnus-limit-string
! 			 (gnus-group-decoded-name gnus-newsgroup-name) 35)
  			(if initial "max" "default")
  			len)
  		       (if initial
--- 12243,12249 ----
  		      (read-string
  		       (format
  			"How many articles from %s (%s %d): "
! 			(gnus-group-decoded-name gnus-newsgroup-name)
  			(if initial "max" "default")
  			len)
  		       (if initial
Index: lisp/ChangeLog
===================================================================
RCS file: /usr/local/cvsroot/gnus/lisp/ChangeLog,v
retrieving revision 7.1543
diff -C0 -r7.1543 ChangeLog
*** lisp/ChangeLog	3 May 2007 18:34:28 -0000	7.1543
--- lisp/ChangeLog	8 May 2007 13:17:47 -0000
***************
*** 0 ****
--- 1,6 ----
+ 2007-05-08  Michaël Cadilhac  <michael@cadilhac.name>
+ 
+ 	* gnus-sum.el (gnus-articles-to-read)
+ 	(gnus-summary-insert-old-articles): Don't truncate group name for
+ 	read-string.
+