summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/ecclesiastic/ecclesiastic.sty
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2008-01-08 14:56:01 +0000
committerNorbert Preining <preining@logic.at>2008-01-08 14:56:01 +0000
commitef9f02e1332e604eb441b2a8ff6bca6a8f3c55a1 (patch)
treed01e6302cd616c901a72124fdcb7a83cee594635 /Master/texmf-dist/tex/latex/ecclesiastic/ecclesiastic.sty
parent7e3e36b12cab7ec0e5c883fc86e92f4a9009c0e2 (diff)
add new package ecclesiastic (to latexextra), one pdf without source removed
git-svn-id: svn://tug.org/texlive/trunk@6145 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/ecclesiastic/ecclesiastic.sty')
-rw-r--r--Master/texmf-dist/tex/latex/ecclesiastic/ecclesiastic.sty182
1 files changed, 182 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/ecclesiastic/ecclesiastic.sty b/Master/texmf-dist/tex/latex/ecclesiastic/ecclesiastic.sty
new file mode 100644
index 00000000000..24f76fe48f6
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/ecclesiastic/ecclesiastic.sty
@@ -0,0 +1,182 @@
+%%
+%% This is file `ecclesiastic.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% ecclesiastic.dtx (with options: `package')
+%%
+%% Copyright 2007 Claudio Beccari All rights reserved.
+%%
+%% This system is distributed in the hope that it will be useful,
+%% but WITHOUT ANY WARRANTY; without even the implied warranty of
+%% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+%%
+%%
+%% IMPORTANT NOTICE:
+%%
+%% This file is subject to the LPPL licence, version 1.3 or any subsequent
+%% version. Copy of the LaTeX Project Public Licence is downloadable from
+%% any CTAN archive.
+%%
+%%
+\NeedsTeXFormat{LaTeX2e}[1996/12/01]%
+\ProvidesPackage{ecclesiastic}%
+ [2007/09/28 v.0.1 Ecclesiastic composition of Latin]
+\def\CheckLatin{\expandafter\ifx\csname captionslatin\endcsname\relax
+ \PackageWarning{ecclesiastic}{\MessageBreak
+ latin must be specified as a global option\MessageBreak
+ or it must be passed as an option to babel\MessageBreak
+ \MessageBreak
+ Nothing done}\expandafter\endinput\fi}
+
+\@ifpackageloaded{babel}{\CheckLatin}{%
+ \PackageWarning{ecclesiastic}{\MessageBreak
+ Package babel must be loaded before this package\MessageBreak
+ \MessageBreak
+ Nothing will be done}\endinput}
+\let\og\empty\let\fg\empty%
+ \def\FrenchGuillemetsFrom#1#2#3#4{%
+ \DeclareFontEncoding{#1}{}{}%
+ \DeclareFontSubstitution{#1}{#2}{m}{n}%
+ \DeclareTextCommand{\guillemotleft}{OT1}{%
+ {\fontencoding{#1}\fontfamily{#2}\selectfont\char#3}}%
+ \DeclareTextCommand{\guillemotright}{OT1}{%
+ {\fontencoding{#1}\fontfamily{#2}\selectfont\char#4}}}
+ \def\CyrillicGuillemets{\FrenchGuillemetsFrom{OT2}{wncyr}{60}{62}}
+ \def\PolishGuillemets{\FrenchGuillemetsFrom{T1}{lmr}{19}{20}}
+ \def\LasyGuillemets{%
+ \DeclareTextCommand{\guillemotleft}{OT1}{\hbox{%
+ \fontencoding{U}\fontfamily{lasy}\selectfont(\kern-0.20em(}}%
+ \DeclareTextCommand{\guillemotright}{OT1}{\hbox{%
+ \fontencoding{U}\fontfamily{lasy}\selectfont)\kern-0.20em)}}}
+ \IfFileExists{t1lmr.fd}{\PolishGuillemets}{%
+ \IfFileExists{ot2wncyr.fd}{\CyrillicGuillemets}{\LasyGuillemets}}
+ \DeclareTextSymbolDefault{\guillemotleft}{OT1}
+ \DeclareTextSymbolDefault{\guillemotright}{OT1}
+ \def\guill@spacing{\penalty\@M\hskip.3\fontdimen2\font
+ \@plus\z@\@minus\z@}
+ \DeclareRobustCommand*{\begin@guill}{\leavevmode
+ \guillemotleft\penalty\@M\guill@spacing
+ \ignorespaces}
+ \DeclareRobustCommand*{\end@guill}{\ifdim\lastskip>\z@\unskip\fi
+ \penalty\@M\guill@spacing\guillemotright{}}
+ \addto\extraslatin{%
+ \renewcommand{\og}{\begin@guill}\renewcommand{\fg}{\end@guill}%
+ }
+ \addto\noextraslatin{\let\og\empty\let\fg\empty}
+\initiate@active@char{'}%
+\addto\extraslatin{\bbl@activate{'}}%
+\addto\noextraslatin{\bbl@deactivate{'}}%
+
+\declare@shorthand{latin}{'a}{\@ifnextchar e{\'\ae\@gobble}{\'a}}
+\declare@shorthand{latin}{'e}{\'e}
+\declare@shorthand{latin}{'i}{\'i}
+\declare@shorthand{latin}{'o}{\@ifnextchar e{\'\oe\@gobble}{\'o}}
+\declare@shorthand{latin}{'u}{\'u}
+\declare@shorthand{latin}{'y}{\'y}
+\declare@shorthand{latin}{'A}{\@ifnextchar E{\'\AE\@gobble}{\'A}}
+\declare@shorthand{latin}{'E}{\'E}
+\declare@shorthand{latin}{'I}{\'I}
+\declare@shorthand{latin}{'O}{\@ifnextchar E{\'\OE\@gobble}{\'O}}
+\declare@shorthand{latin}{'U}{\'U}
+\declare@shorthand{latin}{'Y}{\'Y}
+\declare@shorthand{latin}{"}{%
+\ifmmode
+ \def\lt@next{''}%
+\else
+ \def\lt@next{\futurelet\lt@temp\lt@cwm}%
+\fi
+\lt@next
+}%
+\def\lt@@cwm{\nobreak\discretionary{-}{}{}\nobreak\hskip\z@skip}%
+\def\lt@@ocap#1{\begin@guill}\def\lt@@ccap#1{\end@guill}%
+\DeclareRobustCommand\LT@cwm[2]{%
+ \ifx#1a\bbl@afterelse
+ \maybeae#1#2%
+ \else\bbl@afterfi
+ \testoe#1#2%
+ \fi}
+\def\maybeae#1#2{%
+ \ifx#2e\bbl@afterelse
+ \ae%
+ \else\bbl@afterfi
+ \lt@@cwm#1#2%
+ \fi
+}
+\def\maybeoe#1#2{%
+ \ifx#2e\bbl@afterelse
+ \oe%
+ \else\bbl@afterfi
+ \lt@@cwm#1#2%
+ \fi
+}
+\def\testoe#1#2{%
+ \ifx#1o\bbl@afterelse
+ \maybeoe#1#2%
+ \else\bbl@afterfi
+ \lt@@cwm#1#2%
+ \fi}
+\DeclareRobustCommand*{\lt@cwm}{\let\lt@@next\relax
+\ifcat\noexpand\lt@temp e%
+ \def\lt@@next{\LT@cwm}%
+\else
+ \if\noexpand\lt@temp \string|%
+ \def\lt@@next{\lt@@cwm\@gobble}%
+ \else
+ \if\noexpand\lt@temp \string<%
+ \def\lt@@next{\lt@@ocap}%
+ \else
+ \if\noexpand\lt@temp \string>%
+ \def\lt@@next{\lt@@ccap}%
+ \else
+ \if\noexpand\lt@temp\string/%
+ \def\lt@@next{\slash\@gobble}%
+ \else
+ \ifx\lt@temp"%
+ \def\lt@@next{``\@gobble}%
+ \fi
+ \fi
+ \fi
+ \fi
+ \fi
+\fi
+\lt@@next}%
+\edef\puntoevirgola{\string;}\edef\cc@pv{\the\catcode`;}%
+\edef\duepunti{\string:}\edef\cc@dp{\the\catcode`:}%
+\edef\puntoesclamativo{\string!}\edef\cc@pe{\the\catcode`!}%
+\edef\puntointerrogativo{\string?}\edef\cc@pi{\the\catcode`?}%
+\initiate@active@char{;}
+\initiate@active@char{:}
+\initiate@active@char{!}
+\initiate@active@char{?}
+\addto\extraslatin{\bbl@activate{;}}
+\addto\extraslatin{\bbl@activate{:}}
+\addto\extraslatin{\bbl@activate{!}}
+\addto\extraslatin{\bbl@activate{?}}
+\addto\noextraslatin{\bbl@deactivate{;}}
+\addto\noextraslatin{\bbl@deactivate{:}}
+\addto\noextraslatin{\bbl@deactivate{!}}
+\addto\noextraslatin{\bbl@deactivate{?}}
+\def\punct@spacing{\penalty\@M\hskip.4\fontdimen2\font
+ \@plus\z@\@minus\z@}
+\declare@shorthand{latin}{;}{\ifdim\lastskip>\z@\unskip\fi
+ \punct@spacing\puntoevirgola}
+\declare@shorthand{latin}{:}{\ifdim\lastskip>\z@\unskip\fi
+ \punct@spacing\duepunti}
+\declare@shorthand{latin}{!}{\ifdim\lastskip>\z@\unskip\fi
+ \punct@spacing\puntoesclamativo}
+\declare@shorthand{latin}{?}{\ifdim\lastskip>\z@\unskip\fi
+ \punct@spacing\puntointerrogativo}
+\let\lt@ori@makefntext\@makefntext
+\newcommand\lt@makefntext[1]{%
+ \parindent 1em%
+ \noindent
+ \lt@Makefnmark\enspace #1}
+\newcommand\lt@Makefnmark{\hbox{\normalfont\@thefnmark.}}
+\addto\extraslatin{\let\@makefntext\lt@makefntext}
+\addto\noextraslatin{\let\@makefntext\lt@ori@makefntext}
+\noextraslatin
+\endinput
+%%
+%% End of file `ecclesiastic.sty'.