X-Git-Url: https://diplodocus.org/git/nmh/blobdiff_plain/38615191e71744b066425e0c44412b62dbe49cc2..ff168106b44fdfbaed7d7cf08c54a72ee1fe2c0a:/uip/mhl.c

diff --git a/uip/mhl.c b/uip/mhl.c
index e37c3ba9..263abe72 100644
--- a/uip/mhl.c
+++ b/uip/mhl.c
@@ -1,40 +1,21 @@
-
-/*
- * mhl.c -- the nmh message listing program
- *
- * $Id$
+/* mhl.c -- the nmh message listing program
  *
  * 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>
-
-/* prototype from mhlsbr.c */
-int mhl (int, char **);
+#include "h/mh.h"
+#include "mhlsbr.h"
+#include "h/done.h"
+#include "h/utils.h"
 
 
 int
 main (int argc, char **argv)
 {
-#ifdef LOCALE
-    setlocale(LC_ALL, "");
-#endif
+    if (nmh_init(argv[0], true, false)) { return 1; }
+
     done (mhl (argc, argv));
     return 1;
 }
-
-
-/*
- * Cheat: we are loaded with adrparse, which wants a routine called
- * OfficialName().  We call adrparse:getm() with the correct arguments
- * to prevent OfficialName() from being called.  Hence, the following
- * is to keep the loader happy.
- */
-
-char *
-OfficialName(char *name)
-{
-    return name;
-}