diff options
-rwxr-xr-x | doc/grosciteco.tes | 4 | ||||
-rw-r--r-- | fallback.teco_ini | 2 | ||||
-rw-r--r-- | lib/lexer.tes | 11 |
3 files changed, 12 insertions, 5 deletions
diff --git a/doc/grosciteco.tes b/doc/grosciteco.tes index ce194b7..9be0f1a 100755 --- a/doc/grosciteco.tes +++ b/doc/grosciteco.tes @@ -176,11 +176,11 @@ EBN[input] !cmd.xf! :M#sa :M#giU.n Q.n+16U.#nt .(:M#sa).X[font] :M#sc :Q[fonts.\.n]"F F< ' -U[fonts.\.n] - @:EU[styles]{:Q[lexer.font]"> \.#ntESSTYLESETFONTQ[lexer.font] '^J} + @:EU[styles]{\.#ntESSTYLESETFONTQ[lexer.font]^J} Ocmd.xfQ[font] !cmd.xfR! Q.nU[default-style] - @:EU[styles]{:Q[lexer.font]"> 16ESSTYLESETFONTQ[lexer.font] '^J} + @:EU[styles]{16ESSTYLESETFONTQ[lexer.font]^J} F< !cmd.xfB! @:EU[styles]{1,\.nESSTYLESETBOLD 1,\.#ntESSTYLESETBOLD^J} diff --git a/fallback.teco_ini b/fallback.teco_ini index 4a20807..edd8b7f 100644 --- a/fallback.teco_ini +++ b/fallback.teco_ini @@ -54,7 +54,7 @@ EMQ[$SCITECOPATH]/opener.tes * Tweak the default font name and size. * The size unit is 1pt/100 *! -!![lexer.font]Monospace 1300U[lexer.font] +!![lexer.font]Monospace 1200U[lexer.font] !![lexer.woman.font]Serif !* Enable default function key macros *! diff --git a/lib/lexer.tes b/lib/lexer.tes index 2676e1b..2969184 100644 --- a/lib/lexer.tes +++ b/lib/lexer.tes @@ -5,12 +5,19 @@ [: 0,(1ESPOSITIONFROMLINE:)::S ]: } +!* + * The monospaced font for source code and + * figures in woman-pages. + *! +[lexer.font]Monospace +1200U[lexer.font] + @[lexer.auto]{ - - 0EJ-1"> :Q[lexer.font]"> + 0EJ-1"> 32ESSTYLESETFONTQ[lexer.font] Q[lexer.font],32ESSTYLESETSIZEFRACTIONAL - ' ' + ' :M[color.init] :Q*"= ' [_ |