From: Nicolas Rachinsky <nicolas@dauerreden.de>
Date: Mon, 9 Sep 2002 19:29:23 +0000 (+0000)
Subject: An unmailboxes command.  #1311.
X-Git-Tag: mutt-1-5-2-rel~60
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=9786ef81a8c5fed02075ec51d1fbf8e15e8c215b;p=mutt

An unmailboxes command.  #1311.
---

diff --git a/buffy.c b/buffy.c
index 0a15c92a..660075d8 100644
--- a/buffy.c
+++ b/buffy.c
@@ -162,7 +162,7 @@ void mutt_update_mailbox (BUFFY * b)
 
 int mutt_parse_mailboxes (BUFFER *path, BUFFER *s, unsigned long data, BUFFER *err)
 {
-  BUFFY **tmp;
+  BUFFY **tmp,*tmp1;
   char buf[_POSIX_PATH_MAX];
 #ifdef BUFFY_SIZE
   struct stat sb;
@@ -172,6 +172,19 @@ int mutt_parse_mailboxes (BUFFER *path, BUFFER *s, unsigned long data, BUFFER *e
   {
     mutt_extract_token (path, s, 0);
     strfcpy (buf, path->data, sizeof (buf));
+
+    if(data == M_UNMAILBOXES && mutt_strcmp(buf,"*") == 0)
+    {
+      for (tmp = &Incoming; *tmp;)
+      {
+        safe_free((void **)&((*tmp)->path));
+        tmp1=(*tmp)->next;
+        safe_free((void **)tmp);
+        *tmp=tmp1;
+      }
+      return 0;
+    }
+
     mutt_expand_path (buf, sizeof (buf));
 
     /* Skip empty tokens. */
@@ -184,6 +197,18 @@ int mutt_parse_mailboxes (BUFFER *path, BUFFER *s, unsigned long data, BUFFER *e
 	break;
     }
 
+    if(data == M_UNMAILBOXES)
+    {
+      if(*tmp)
+      {
+        safe_free((void **)&((*tmp)->path));
+        tmp1=(*tmp)->next;
+        safe_free((void **)tmp);
+        *tmp=tmp1;
+      }
+      continue;
+    }
+
     if (!*tmp)
     {
       *tmp = (BUFFY *) safe_calloc (1, sizeof (BUFFY));
diff --git a/buffy.h b/buffy.h
index f3e81952..adfc2695 100644
--- a/buffy.h
+++ b/buffy.h
@@ -16,6 +16,10 @@
  *     Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
  */
 
+/*parameter to mutt_parse_mailboxes*/
+#define M_MAILBOXES   1
+#define M_UNMAILBOXES 2 
+
 typedef struct buffy_t
 {
   char *path;
diff --git a/doc/manual.sgml.head b/doc/manual.sgml.head
index dfb36a66..829151b1 100644
--- a/doc/manual.sgml.head
+++ b/doc/manual.sgml.head
@@ -1207,7 +1207,7 @@ mailbox).
 
 <sect1>Defining mailboxes which receive mail<label id="mailboxes">
 <p>
-Usage: <tt/mailboxes/ &lsqb;!&rsqb;<em/filename/ &lsqb; <em/filename/ ... &rsqb;
+Usage: <tt/&lsqb;un&rsqb;mailboxes/ &lsqb;!&rsqb;<em/filename/ &lsqb; <em/filename/ ... &rsqb;
 
 This command specifies folders which can receive mail and
 which will be checked for new messages.  By default, the
@@ -1221,6 +1221,11 @@ Pressing TAB in the directory browser will bring up a menu showing the files
 specified by the <tt/mailboxes/ command, and indicate which contain new
 messages.  Mutt will automatically enter this mode when invoked from the
 command line with the <tt/-y/ option.
+
+The ``unmailboxes'' command is used to remove a token from the list
+of folders which receive mail. Use ``unmailboxes *'' to remove all
+tokens.
+
 <p>
 <bf/Note:/ new mail is detected by comparing the last modification time to
 the last access time.  Utilities like <tt/biff/ or <tt/frm/ or any other
diff --git a/doc/muttrc.man.head b/doc/muttrc.man.head
index e0f718e9..a0e84b53 100644
--- a/doc/muttrc.man.head
+++ b/doc/muttrc.man.head
@@ -18,7 +18,7 @@
 .\"     along with this program; if not, write to the Free Software
 .\"     Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
 .\"
-.TH muttrc 5 "February 2001" Unix "User Manuals"
+.TH muttrc 5 "September 2002" Unix "User Manuals"
 .SH NAME
 .PP
 muttrc \- Configuration file for the Mutt Mail User Agent
@@ -238,11 +238,18 @@ When mutt changes to a mail folder which matches \fIpattern\fP,
 messages will be moved to that folder when the mail folder is left.
 .IP
 The first matchig \fBmbox-hook\fP applies.
-.TP
+.PP
+.nf
 \fBmailboxes\fP \fIfilename\fP [ \fIfilename\fP ... ]
-This command specifies folders which can receive mail and which will
+\fBunmailboxes\fP [ \fB*\fP | \fIfilename\fP ... ]
+.fi
+.IP
+The \fBmailboxes\fP specifies folders which can receive mail and which will
 be checked for new messages.  When changing folders, pressing space
-will cycle through folders with new mail. 
+will cycle through folders with new mail.  The \fBunmailboxes\fP
+command is used to remove a file name from the list of folders which
+can receive mail.  If "\fB*\fP" is specified as the file name, the
+list is emptied.
 .PP
 .nf
 \fBmy_hdr\fP \fIstring\fP
diff --git a/init.h b/init.h
index 0f84dd87..30970ec1 100644
--- a/init.h
+++ b/init.h
@@ -2676,7 +2676,8 @@ struct command_t Commands[] = {
   { "ignore",		parse_ignore,		0 },
   { "lists",		parse_list,		UL &MailLists },
   { "macro",		mutt_parse_macro,	0 },
-  { "mailboxes",	mutt_parse_mailboxes,	0 },
+  { "mailboxes",	mutt_parse_mailboxes,	M_MAILBOXES },
+  { "unmailboxes",	mutt_parse_mailboxes,	M_UNMAILBOXES },
   { "message-hook",	mutt_parse_hook,	M_MESSAGEHOOK },
   { "mbox-hook",	mutt_parse_hook,	M_MBOXHOOK },
   { "mime_lookup",	parse_list,	UL &MimeLookupList },