popsbr.c: Alter traverse() to check action callback's result.

[nmh] / sbr / folder_pack.c

diff --git a/sbr/folder_pack.c b/sbr/folder_pack.c
index 7a661a5348f5fee65fb2d81d95fd8bc23fc9e41a..82a366c88b95caeac7d5333788ec75dc92d32d30 100644 (file)
--- a/sbr/folder_pack.c
+++ b/sbr/folder_pack.c
@@ -1,10 +1,6 @@
-
-/*
- * folder_pack.c -- pack (renumber) the messages in a folder
+/* folder_pack.c -- pack (renumber) the messages in a folder

  *               -- into a contiguous range from 1 to n.
  *
  *               -- into a contiguous range from 1 to n.
  *

- * $Id$
- *

  * This code is Copyright (c) 2002, by the authors of nmh.  See the
  * COPYRIGHT file in the root directory of the nmh distribution for
  * complete copyright information.
  * This code is Copyright (c) 2002, by the authors of nmh.  See the
  * COPYRIGHT file in the root directory of the nmh distribution for
  * complete copyright information.


@@ -40,7 +36,7 @@ folder_pack (struct msgs **mpp, int verbose)
        if ((mp = folder_realloc (mp, 1, mp->hghmsg)))
            *mpp = mp;
        else {
        if ((mp = folder_realloc (mp, 1, mp->hghmsg)))
            *mpp = mp;
        else {

-           advise (NULL, "unable to allocate folder storage");
+           inform("unable to allocate folder storage");

            return -1;
        }
     }
            return -1;
        }
     }


@@ -53,6 +49,16 @@ folder_pack (struct msgs **mpp, int verbose)
                if (verbose)
                    printf ("message %s becomes %s\n", oldmsg, newmsg);
 
                if (verbose)
                    printf ("message %s becomes %s\n", oldmsg, newmsg);
 

+               /*
+                * Invoke the external refile hook for each message being renamed.
+                * This is done before the file is renamed so that the old message
+                * file is around for the hook.
+                */
+
+               (void)snprintf(oldmsg, sizeof (oldmsg), "%s/%d", mp->foldpath, msgnum);
+               (void)snprintf(newmsg, sizeof (newmsg), "%s/%d", mp->foldpath, hole);
+               ext_hook("ref-hook", oldmsg, newmsg);
+

                /* move the message file */
                if (rename (oldmsg, newmsg) == -1) {
                    advise (newmsg, "unable to rename %s to", oldmsg);
                /* move the message file */
                if (rename (oldmsg, newmsg) == -1) {
                    advise (newmsg, "unable to rename %s to", oldmsg);