From a1796b7f8171d4ff67019437948f38c00bb1e23d Mon Sep 17 00:00:00 2001
From: wl <wl>
Date: Wed, 18 Jul 2012 08:50:52 +0000
Subject: [mdoc] Make `Fl' correctly restore fonts.

* tmac/doc.tmac (doc-flag-recursion): Do it.
---
 tmac/doc.tmac | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'tmac')

diff --git a/tmac/doc.tmac b/tmac/doc.tmac
index 0bb7f301..bbec7c5b 100644
--- a/tmac/doc.tmac
+++ b/tmac/doc.tmac
@@ -438,7 +438,7 @@
 .      \" last argument
 .      if (\n[doc-reg-dfr1] == 4) \
 .        nop \|\-\c
-.      nop \f[]\s[0]\c
+.      nop \f[\n[doc-curr-font]]\s[\n[doc-curr-size]u]\c
 .      doc-print-and-reset
 .    \}
 .    el \{\
-- 
cgit v1.2.1