texinfo ChangeLog doc/texinfo.tex

[Karl Berry]

CVSROOT:        /sources/texinfo
Module name:    texinfo
Changes by:     Karl Berry <karl>       12/08/13 22:47:06

Modified files:
        .              : ChangeLog 
        doc            : texinfo.tex 

Log message:
        (\ecfont): support ectt

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/texinfo/ChangeLog?cvsroot=texinfo&r1=1.1391&r2=1.1392
http://cvs.savannah.gnu.org/viewcvs/texinfo/doc/texinfo.tex?cvsroot=texinfo&r1=1.370&r2=1.371

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/texinfo/texinfo/ChangeLog,v
retrieving revision 1.1391
retrieving revision 1.1392
diff -u -b -r1.1391 -r1.1392
--- ChangeLog   13 Aug 2012 21:35:51 -0000      1.1391
+++ ChangeLog   13 Aug 2012 22:47:06 -0000      1.1392
@@ -1,3 +1,8 @@
+2012-08-13  Werner Lember  <address@hidden>
+
+       * doc/texinfo.tex (\ecfont): test for monospace,
+       so we can get a typewriter thorn, etc.
+       
 2012-08-13  Karl Berry  <address@hidden>
 
        * doc/texinfo.txi (HTML Xref Command Expansion): U+21A6

Index: doc/texinfo.tex
===================================================================
RCS file: /sources/texinfo/texinfo/doc/texinfo.tex,v
retrieving revision 1.370
retrieving revision 1.371
diff -u -b -r1.370 -r1.371
--- doc/texinfo.tex     30 Jul 2012 00:13:39 -0000      1.370
+++ doc/texinfo.tex     13 Aug 2012 22:47:06 -0000      1.371
@@ -3146,6 +3146,10 @@
   % hopefully nobody will notice/care.
   \edef\ecsize{\csname\curfontsize ecsize\endcsname}%
   \edef\nominalsize{\csname\curfontsize nominalsize\endcsname}%
+  \ifmonospace
+    % typewriter:
+    \font\thisecfont = ectt\ecsize \space at \nominalsize
+  \else
   \ifx\curfontstyle\bfstylename
     % bold:
     \font\thisecfont = ecb\ifusingit{i}{x}\ecsize \space at \nominalsize
@@ -3153,6 +3157,7 @@
     % regular:
     \font\thisecfont = ec\ifusingit{ti}{rm}\ecsize \space at \nominalsize
   \fi
+  \fi
   \thisecfont
 }