-/*
-** refile.c -- call the "fileproc" to refile the
-** -- msg or draft into another folder
-**
-** 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.
-*/
-
-#include <h/mh.h>
-
-
-int
-refile(char **arg, char *file)
-{
- pid_t pid;
- register int vecp;
- char *vec[MAXARGS];
-
- vecp = 0;
- vec[vecp++] = mhbasename(fileproc);
- vec[vecp++] = "-nolink"; /* override bad .mh_profile defaults */
- vec[vecp++] = "-nopreserve";
- vec[vecp++] = "-file";
- vec[vecp++] = file;
-
- if (arg) {
- while (*arg)
- vec[vecp++] = *arg++;
- }
- vec[vecp] = NULL;
-
- context_save(); /* save the context file */
- fflush(stdout);
-
- switch (pid = fork()) {
- case -1:
- advise("fork", "unable to");
- return -1;
-
- case 0:
- execvp(fileproc, vec);
- fprintf(stderr, "unable to exec ");
- perror(fileproc);
- _exit(-1);
-
- default:
- return (pidwait(pid, -1));
- }
-}