Ported from LaTeX 2.09 to modern LaTeX 2e.
This commit is contained in:
		
							parent
							
								
									1eecb9c9c5
								
							
						
					
					
						commit
						2df502cd0a
					
				|  | @ -1,5 +1,6 @@ | |||
| %&lplain -*- latex -*- | ||||
| \documentstyle[code,11pt,boxedminipage,draftfooters,palatino,ct]{article} | ||||
| \documentclass[11pt]{article} | ||||
| \usepackage{ct,boxedminipage,draftfooters,code} | ||||
| \input{headings} | ||||
| \begin{document} | ||||
| 
 | ||||
|  |  | |||
|  | @ -110,7 +110,8 @@ | |||
| {\catcode`\^^M=\active % these lines must end with % | ||||
|   \gdef\codeallowbreaks{\catcode`\^^M\active\let^^M\cd@crbr}} | ||||
| 
 | ||||
| \def\cd@crbr{\leavevmode\endgraf} % What ^M turns into. | ||||
| %\def\cd@crbr{\leavevmode\endgraf} % What ^M turns into. | ||||
| \def\cd@crbr{\par\leavevmode} % What ^M turns into. | ||||
| 
 | ||||
| 
 | ||||
| % \cd@obeycrsp  | ||||
|  | @ -149,7 +150,7 @@ | |||
| % FOO-\=BAR. | ||||
| 
 | ||||
| \def\setupcode{\parsep=0pt\parindent=0pt% | ||||
|   \tt\frenchspacing\catcode``=13\@noligs% | ||||
|   \normalfont\ttfamily\frenchspacing\catcode``=13\@noligs% | ||||
|   \def\\{\char`\\}% | ||||
|   \let\dcd=\cd@dcd\let\cddollar=\cd@dollarspecial\let\cdmath=\cd@mathspecial% | ||||
|   \@makeother\$\@makeother\&\@makeother\#% | ||||
|  | @ -291,3 +292,5 @@ | |||
| %   are starting a paragraph. | ||||
| % - Added the codebox env. Tricky bit involving the first line hacked | ||||
| %   with help from David Long. | ||||
| % Olin 8/94 | ||||
| % Changed the font commands for LaTeX2e. | ||||
|  |  | |||
|  | @ -1,44 +1,6 @@ | |||
| % Loads cmtt fonts in on \tt. -*- latex -*- | ||||
| % I prefer these to the Courier fonts that latex gives you w/postscript styles. | ||||
| % Courier is too spidery and too wide -- it's hard to get 80 chars on a line. | ||||
| % This works with the font machinery as defined at CMU; your mileage may vary. | ||||
| % \tt defined here for 5-12,14,17 pt sizes; extend in the obvious way | ||||
| % for bigger sizes. -Olin 3/91 | ||||
| %	-Olin | ||||
| 
 | ||||
| % Interlock: only load this file once. | ||||
| \ifx\ct@loaded\relax\endinput\else\let\ct@loaded=\relax\fi | ||||
| 
 | ||||
| % Define the fonts: | ||||
| \newfont{\ctxvii}{cmtt10 scaled \magstep3} | ||||
| \newfont{\ctxiv}{cmtt10 scaled \magstep2} | ||||
| \newfont{\ctxii}{cmtt12} | ||||
| \newfont{\ctxi}{cmtt10 scaled \magstephalf} | ||||
| \newfont{\ctx}{cmtt10} | ||||
| \newfont{\ctix}{cmtt9} | ||||
| \newfont{\ctviii}{cmtt8} | ||||
| \newfont{\ctvii}{cmtt10 at 7pt} | ||||
| \newfont{\ctvi}{cmtt10 at 6pt} | ||||
| \newfont{\ctv}{cmtt10 at 5pt} | ||||
| 
 | ||||
| % Install 3 fonts as the current \tt font family. | ||||
| % #1 is textfont; #2 scriptfont; #3 scriptscriptfont. | ||||
| \def\ct@setfonts#1#2#3{\def\ptt{\fam\ttfam#1}\textfont\ttfam#1% | ||||
| 		       \scriptfont\ttfam#2\scriptscriptfont\ttfam#3} | ||||
| 
 | ||||
| \@addfontinfo\@vipt{\ct@setfonts\ctvi\ctvi\ctvi} | ||||
| \@addfontinfo\@viipt{\ct@setfonts\ctvii\ctvi\ctv} | ||||
| \@addfontinfo\@viiipt{\ct@setfonts\ctviii\ctvi\ctv} | ||||
| \@addfontinfo\@ixpt{\ct@setfonts\ctix\ctvi\ctv} | ||||
| \@addfontinfo\@xpt{\ct@setfonts\ctx\ctvii\ctv} | ||||
| \@addfontinfo\@xipt{\ct@setfonts\ctxi\ctviii\ctvi} | ||||
| \@addfontinfo\@xiipt{\ct@setfonts\ctxii\ctviii\ctvi} | ||||
| \@addfontinfo\@xivpt{\ct@setfonts\ctxiv\ctx\ctvii} | ||||
| \@addfontinfo\@xviipt{\ct@setfonts\ctxvii\ctxii\ctx} | ||||
| %\@addfontinfo\@xxpt{\ct@setfonts\ctxx\ctxiv\ctxii} | ||||
| %\@addfontinfo\@xxvpt{\ct@setfonts\ctxxv\ctxx\ctxvii} | ||||
| 
 | ||||
| %% Note that \@xiipt, for example, is called from 2 places: | ||||
| %% at the end of the \@setsize sets up 12pt (from, say, \normalsize), | ||||
| %% and at the end of the \@getfont that \ptt does when loading in | ||||
| %% a font. However, since the @\setsize whomps the default defn of | ||||
| %% \ptt, this second call never happens. And a good thing, too. | ||||
| \renewcommand{\ttdefault}{cmtt} | ||||
|  |  | |||
		Loading…
	
		Reference in New Issue
	
	 shivers
						shivers