From 394873558f2b66014f6502f8fdf94b0ae59f0227 Mon Sep 17 00:00:00 2001
From: Tim Kientzle <kientzle@gmail.com>
Date: Mon, 13 Apr 2009 17:17:14 -0400
Subject: Quote a leading '_'

SVN-Revision: 976
---
 doc/mdoc2wiki.awk | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'doc')

diff --git a/doc/mdoc2wiki.awk b/doc/mdoc2wiki.awk
index f9328121..c22b4f64 100755
--- a/doc/mdoc2wiki.awk
+++ b/doc/mdoc2wiki.awk
@@ -260,7 +260,9 @@ function splitwords(l, dest, n, o, w) {
       else
 	add(words[++w] "_")
     } else if(match(words[w],"^Cm$")) {
-      add("*" words[++w] "*")
+      ++w
+      gsub("^_", "`_`", words[w])
+      add("*" words[w] "*")
     } else if(match(words[w],"^Op$")) {
       addopen("[")
       option=1
-- 
cgit v1.2.1