Prefix error messages from mandoc(1) with "mandoc: "

just like almost all other utility programs do.
Suggested by nick@ who wondered where messages came from
when calling mandoc(1) from inside a Perl script.
ok jmc@ nick@

diff --git a/main.c b/main.c
index 75a75f1184c584322e4b4af551475f8ce630f2df..c14977615a6b32a6a324f4c3ba6a0595873771e9 100644 (file)
--- a/main.c
+++ b/main.c
@@ -1,4 +1,4 @@
-/*     $Id: main.c,v 1.173 2014/04/20 16:46:04 schwarze Exp $ */
+/*     $Id: main.c,v 1.174 2014/06/20 16:11:42 schwarze Exp $ */
 /*
  * Copyright (c) 2008, 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv>
  * Copyright (c) 2010, 2011, 2012, 2014 Ingo Schwarze <schwarze@openbsd.org>
@@ -408,7 +408,8 @@ mmsg(enum mandocerr t, enum mandoclevel lvl,
                const char *file, int line, int col, const char *msg)
 {
 
-       fprintf(stderr, "%s:%d:%d: %s: %s", file, line, col + 1,
+       fprintf(stderr, "%s: %s:%d:%d: %s: %s", progname,
+           file, line, col + 1,
            mparse_strlevel(lvl), mparse_strerror(t));
 
        if (msg)