first bad stab at styles

1 files changed, 5 insertions, 24 deletions

diff --git a/blueprint.otx b/blueprint.otx
index ed415c3..cccc22c 100644
--- a/blueprint.otx
+++ b/blueprint.otx
@@ -1,6 +1,8 @@
 \input sal.otx
+\input aux.otx
 \margins/2 fold (0.75,0.5,0.3,0.3)in
 
+\fontfam[Latin Modern]
 \def\speech#1{\e{#1}} % ?
 
 % \newcommand\essaytitle{\uline}
@@ -14,29 +16,6 @@
 \def\greater{>}
 \def\less{<}
 
-
-% --- strikeouts
-% --- TODO this should be moved into sal.otx probably
-\def\cancel#1#{\isempty{#1}\iftrue \afterfi{\cancel/}
-   \else
-      \lowercase{\casesof #1}
-        /  {\let\cancline=\drawFslash}
-        \\ {\let\cancline=\drawBslash}
-        x  {\def\cancline{\drawBslash\drawFslash}}
-        -  {\let\cancline=\drawHline}
-        \_finc {}%
-      \ea\cancelA
-   \fi
-}
-\def\cancelA{\ifmmode \ea\cancelM \else \ea\cancelT \fi}
-\def\cancelT#1{\setbox0=\hbox{#1}\cancelF} % text mode
-\def\cancelM#1{\mathstyles{\setbox0=\hbox{$\currstyle#1$}\cancelF}} % math mode
-\def\cancelF{\edef\tmp{\cancline}\quitvmode\box0 \pdfliteral{q \useit{\cancelparams} \tmp S Q}}
-\def\drawFslash{\bp{-\wd0} \bp{-\dp0} m 0 \bp{\ht0} l } % forward slash
-\def\drawBslash{\bp{-\wd0} \bp{\ht0} m 0 \bp{-\dp0} l } % backward slash
-\def\drawHline {\bp{-\wd0} \bp{.5ex} m 0 \bp{.5ex} l }  % horizontal line
-\def\cancelparams{1 0 0 RG 1 J .6 w} % color RG linetype J linewidth w
-% ---------
 \def\redact#1{\cancel-{#1}}
 
 \def\stress#1{{\bf #1}}
@@ -75,6 +54,7 @@
 \picdir={img/}
 
 % ... blank headers, footers, folios
+\blankstyle
 
 % Title
 {
@@ -99,8 +79,9 @@ colophon goes here
 
 \break
 % ... folios to roman numerals
+\frontmatterstyle
 
-% \input{essays/introduction.tex}
+\input essays/introduction.otx
 % \input{essays/sal_introduction.tex}
 
 \break