From 873660d1a83ece926fe7206288dda9c36b349c1b Mon Sep 17 00:00:00 2001
From: Karl Berry <karl@freefriends.org>
Date: Thu, 12 Jan 2006 23:46:03 +0000
Subject: generic 1

git-svn-id: svn://tug.org/texlive/trunk@613 c570f23f-e606-0410-a88d-b1316a301751
---
 Master/texmf-dist/tex/generic/enctex/noprefnt.tex | 29 +++++++++++++++++++++++
 1 file changed, 29 insertions(+)
 create mode 100644 Master/texmf-dist/tex/generic/enctex/noprefnt.tex

(limited to 'Master/texmf-dist/tex/generic/enctex/noprefnt.tex')

diff --git a/Master/texmf-dist/tex/generic/enctex/noprefnt.tex b/Master/texmf-dist/tex/generic/enctex/noprefnt.tex
new file mode 100644
index 00000000000..f251ee812bc
--- /dev/null
+++ b/Master/texmf-dist/tex/generic/enctex/noprefnt.tex
@@ -0,0 +1,29 @@
+
+% NOPREFNT.TEX, ver. 1,  September 1997,    by Petr Olsak (Ol\v s\'ak)
+%
+% This file re-defines the TeX primitive \font by the following way.
+%
+% You write:                               The meaning:
+%  \font\preloaded=*[scaled \magstep?] .... ignore loading 
+%  another cases ...                        the font is loaded
+
+\ifx\ignoreload\undefined \else \expandafter\endinput \fi
+
+\catcode`\{=1 % left brace is begin-group character
+\catcode`\}=2 % right brace is end-group character
+\catcode`\#=6 % hash mark is macro parameter character
+
+\let\originalfont\font
+\edef\tempb{\string\preloaded}
+\def\font#1=#2 {\edef\tempa{\string#1}%
+  \ifx\tempa\tempb\let\next=\ignoreload
+  \else \def\next{\originalfont#1=#2 }%
+  \fi\next}
+\long\def\ignoreload#1{\ifx#1s\let\next=\skipscaled
+     \else\long\def\next{#1}\fi\next}
+\def\skipscaled #1\magstep#2{}
+\def\restorefont{\let\font\originalfont  \let\originalfont\undefined
+  \let\ignoreload\undefined \let\restorefont\undefined}
+
+% end of file NOPREFNT.TEX
+
-- 
cgit v1.2.3

