From mboxrd@z Thu Jan  1 00:00:00 1970
Received: from localhost (fantadrom.bsd.lv [local]);
	by fantadrom.bsd.lv (OpenSMTPD) with ESMTPA id fe258951;
	for <source@mdocml.bsd.lv>;
	Fri, 13 Feb 2015 13:44:34 -0500 (EST)
Date: Fri, 13 Feb 2015 13:44:34 -0500 (EST)
Message-Id: <2594624295437182203.enqueue@fantadrom.bsd.lv>
X-Mailinglist: mdocml-source
Reply-To: source@mdocml.bsd.lv
MIME-Version: 1.0
From: schwarze@mdocml.bsd.lv
To: source@mdocml.bsd.lv
Subject: pod2mdoc: in the SYNOPSIS, render preprocessor lines with .Fd
X-Mailer: activitymail 1.26, http://search.cpan.org/dist/activitymail/
Content-Type: text/plain; charset=utf-8

Log Message:
-----------
in the SYNOPSIS, render preprocessor lines with .Fd

Modified Files:
--------------
    pod2mdoc:
        pod2mdoc.1
        pod2mdoc.c

Revision Data
-------------
Index: pod2mdoc.c
===================================================================
RCS file: /home/cvs/mdocml/pod2mdoc/pod2mdoc.c,v
retrieving revision 1.40
retrieving revision 1.41
diff -Lpod2mdoc.c -Lpod2mdoc.c -u -p -r1.40 -r1.41
--- pod2mdoc.c
+++ pod2mdoc.c
@@ -1093,9 +1093,19 @@ again:
 				start++;
 			if (start < end && '\n' == buf[start])
 				start++;
-			if (start < end) 
-				goto again;
-			return;
+			goto again;
+		}
+
+		/* Other preprocessor directives. */
+		if ('#' == buf[i]) {
+			fputs(".Fd ", stdout);
+			start = i;
+			while(start < end && '\n' != buf[start])
+				putchar(buf[start++]);
+			putchar('\n');
+			if (start < end && '\n' == buf[start])
+				start++;
+			goto again;
 		}
 
 		/* Parse function declaration. */
Index: pod2mdoc.1
===================================================================
RCS file: /home/cvs/mdocml/pod2mdoc/pod2mdoc.1,v
retrieving revision 1.15
retrieving revision 1.16
diff -Lpod2mdoc.1 -Lpod2mdoc.1 -u -p -r1.15 -r1.16
--- pod2mdoc.1
+++ pod2mdoc.1
@@ -107,6 +107,11 @@ lines are found at the start of a verbat
 with
 .Sq \&In .
 .It
+Other lines starting with
+.Sq #
+are rendered with
+.Sq \&Fd .
+.It
 An initial
 .Li B<>
 format code is rendered as
--
 To unsubscribe send an email to source+unsubscribe@mdocml.bsd.lv