summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/xelatex
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2007-07-26 17:59:28 +0000
committerKarl Berry <karl@freefriends.org>2007-07-26 17:59:28 +0000
commit85d9421bba33f314d23a3cc34828fc357b01aacd (patch)
tree64223ff5b566b9d2d01bc9e9fa9d88cf3cf0850b /Master/texmf-dist/tex/xelatex
parentfb7e6e75508ba3e8eca86ca810f7d500a25a4708 (diff)
philokalia update, getting .otf in fonts/ (frank 25jul07)
git-svn-id: svn://tug.org/texlive/trunk@4653 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/xelatex')
-rw-r--r--Master/texmf-dist/tex/xelatex/philokalia/philokalia.sty51
1 files changed, 45 insertions, 6 deletions
diff --git a/Master/texmf-dist/tex/xelatex/philokalia/philokalia.sty b/Master/texmf-dist/tex/xelatex/philokalia/philokalia.sty
index e7118ccb2ef..a24e55fa33b 100644
--- a/Master/texmf-dist/tex/xelatex/philokalia/philokalia.sty
+++ b/Master/texmf-dist/tex/xelatex/philokalia/philokalia.sty
@@ -34,20 +34,59 @@
%% Grave accent \` Left brace \{ Vertical bar \|
%% Right brace \} Tilde \~}
\ProvidesFile{philokalia.sty}
-[2007/01/07 v1.0 Package `philokalia']
+[2007/01/24 v1.1 Package `philokalia']
+\RequirePackage{fontspec}
+\RequirePackage{xunicode}
+\RequirePackage{xltxtra}
+\RequirePackage{lettrine}
+\newsavebox{\Pb@x}
+\def\Lettrine@height{%
+ \@tempdima=\baselineskip
+ \setlength{\L@height}{\theL@lines\@tempdima}%
+ \ifnum\theL@lines>1
+ \addtolength{\L@height}{-\@tempdima}%
+ \fi
+ \sbox{\L@tbox}{\LettrineTextFont "03B1}%%%% Modified here
+ \addtolength{\L@height}{\ht\L@tbox}%
+ \addtolength{\L@height}{\L@oversize\L@height}}
+\renewcommand*{\LettrineFont}{%
+ \Lettrine@height
+ \sbox{\L@tbox}{\LettrineFontHook\fontsize{\L@height}{\L@height}%
+ \selectfont "0391}%%%% Modified here
+ \@tempcntb=\ht\L@tbox
+ \@tempcnta=\L@height
+ \multiply\@tempcnta by 100
+ \divide\@tempcntb by 100
+ \divide\@tempcnta by \@tempcntb
+ \advance\@tempcnta by -9999
+ \ifnum\@tempcnta>0
+ \def\@tempa{1.\the\@tempcnta}%
+ \else
+ \def\@tempa{1}%
+ \fi
+ \LettrineFontHook
+ \fontsize{\@tempa\L@height}{\@tempa\L@height}%
+ \selectfont
+}
\DeclareOption{global}{%
\renewcommand{\rmdefault}{plk}%
+ \DeclareFontFamily{EU1}{plktitl}{}%
+ \DeclareFontShape{EU1}{plktitl}{m}{n}%
+ {<-> "[Philokalia-Regular]/ICU:script=grek,+titl"}{}%
+ \newcommand{\textinit}[2]{%
+ \savebox{\Pb@x}{\usefont{EU1}{plktitl}{m}{n} #1}%
+ \lettrine[lines=3]{\usebox{\Pb@x}}{#2}}%
}
\DeclareOption{local}{%
\def\phkl{\fontfamily{plk}\selectfont}%
\newcommand{\textphlk}[1]{{\phkl #1}}%
}
-\ExecuteOptions{global}
+\ExecuteOptions{local}
\ProcessOptions
-\RequirePackage{fontspec}
-\RequirePackage{xunicode}
-\RequirePackage{xltxtra}
-\def\dminus{{\fontfamily{plk}\selectfont\char"0185}}
+\def\dsubop{{\fontfamily{plk}\selectfont\char"018B}}
+\def\dUnit{{\fontfamily{plk}\selectfont\char"018C}}
+\def\dunit{{\fontfamily{plk}\selectfont\char"018D}}
+\def\dunknown{{\fontfamily{plk}\selectfont\char"018E}}
\endinput
%%
%% End of file `philokalia.sty'.