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

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'.