===================================================================
RCS file: /cvs/mandoc/Attic/mdocml.c,v
retrieving revision 1.13
retrieving revision 1.15
diff -u -p -r1.13 -r1.15
--- mandoc/Attic/mdocml.c	2008/11/27 17:27:50	1.13
+++ mandoc/Attic/mdocml.c	2008/12/02 00:10:37	1.15
@@ -1,4 +1,4 @@
-/* $Id: mdocml.c,v 1.13 2008/11/27 17:27:50 kristaps Exp $ */
+/* $Id: mdocml.c,v 1.15 2008/12/02 00:10:37 kristaps Exp $ */
 /*
  * Copyright (c) 2008 Kristaps Dzonsons <kristaps@kth.se>
  *
@@ -80,8 +80,6 @@ main(int argc, char *argv[])
 	if (1 == argc)
 		in = *argv++;
 
-	args.type = MD_DUMMY;
-
 	return(begin_io(&args, out ? out : "-", in ? in : "-"));
 }
 
@@ -108,6 +106,9 @@ leave_io(const struct md_buf *out, 
 		warn("%s", out->name);
 		c = 1;
 	}
+	if (1 == c && STDOUT_FILENO != out->fd)
+		if (-1 == unlink(out->name))
+			warn("%s", out->name);
 
 	return(c);
 }