diplodocus.org Git - nmh/blob - sbr/remdir.c

   1
   2 /*
   3  * remdir.c -- remove a directory
   4  *
   5  * $Id$
   6  */
   7
   8 #include <h/mh.h>
   9
  10
  11 int
  12 remdir (char *dir)
  13 {
  14     context_save();     /* save the context file */
  15     fflush(stdout);
  16
  17     if (rmdir(dir) == -1) {
  18         admonish (dir, "unable to remove directory");
  19         return 0;
  20     }
  21     return 1;
  22 }