Re: [patch] gnus.el::gnus-invalid-group-regexp - Support IMAP

[letters@hotpop.com (Jari Aalto+mail.linux)]

  Simon Josefsson <jas <at> extundo.com>
  > I happened to read thread and the default indeed seemed a little twirst.
  > Please review,

  A potential problem may be if you create, e.g., a nnml or nnfolder
  group with the name containing '/'.  Does it work?  With Agent/Caching
  too?  Does it do what users expect?  With all
  nnmail-use-long-file-names settings?  No problems with having two
  groups 'foo' and 'foo/bar'?  Many questions.

Hm. Okay, what about letting user decide? Like this:

2003-08-19 Tue  Jari Aalto  <jari.aalto@poboxes.com>

        * gnus.el (gnus-read-group): 6.194 Added check to ask confirmation
	if Group name contains invalid character. You can use '/' in IMAP,
	but not in filenames. G m cannot know what the user is creating,
	so let user decide. See thread
	http://groups.google.com/groups?oi=djq&as_umsgid=%3Cm2oeysiev3.fsf@naima.lensflare.org
	also available at GOOGLE: "Creating IMAP group"
	group:gnu.emacs.gnus

Prereq: 6.194

Index: gnus.el
===================================================================
RCS file: /usr/local/cvsroot/gnus/lisp/gnus.el,v
retrieving revision 6.194
diff -u -IId: -u -b -w -r6.194 gnus.el
--- gnus.el	7 Aug 2003 00:34:56 -0000	6.194
+++ gnus.el	19 Aug 2003 18:12:13 -0000
@@ -3714,8 +3714,13 @@
 	     (setq group (read-string (concat prefix prompt)
 				      (cons (or default "") 0)
 				      'gnus-group-history)))
+        (let ((match (match-string 0 group)))
+          (unless (y-or-n-p
+                   (format
+                    "Warning, group \"%s\" contains \"%s\"; Are you SURE? "
+                    group match))
 	(setq prefix (format "Invalid group name: \"%s\".  " group)
-	      group nil)))
+                  group nil)))))
     group))
 
 (defun gnus-read-method (prompt)


-- 
http://tiny-tools.sourceforge.net/
Swatch @time   http://www.mir.com.my/iTime/itime.htm
               http://www.ryanthiessen.com/swatch/resources.htm
Use Licenses!  http://www.linuxjournal.com/article.php?sid=6225
Which Licence? http://www.linuxjournal.com/article.php?sid=4825
OSI Licences   http://www.opensource.org/licenses/