summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2023-06-19 20:22:25 +0000
committerKarl Berry <karl@freefriends.org>2023-06-19 20:22:25 +0000
commit80615d877e8bcedee209a61c82aa20b22adbe943 (patch)
tree519ede863082af8b244fa646897ba9bdd7e54665 /Master/texmf-dist/tex
parent2140579f064a0fce2295b1d822da067df613d950 (diff)
rm context-lettrine, now obsolete on ctan
git-svn-id: svn://tug.org/texlive/trunk@67412 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex')
-rw-r--r--Master/texmf-dist/tex/context/interface/third/lettrine.xml65
-rw-r--r--Master/texmf-dist/tex/context/third/lettrine/t-lettrine.tex163
2 files changed, 0 insertions, 228 deletions
diff --git a/Master/texmf-dist/tex/context/interface/third/lettrine.xml b/Master/texmf-dist/tex/context/interface/third/lettrine.xml
deleted file mode 100644
index 83093547786..00000000000
--- a/Master/texmf-dist/tex/context/interface/third/lettrine.xml
+++ /dev/null
@@ -1,65 +0,0 @@
-<?xml version="1.0"?>
-
-<cd:interface xmlns:cd="http://www.pragma-ade.com/commands"
- name="context/third/t-lettrine"
- language="all" version="2005.03.26">
-
-<cd:command name="setuplettrine" file="t-lettrine.tex">
- <cd:sequence>
- <cd:string value="setuplettrine"/>
- </cd:sequence>
- <cd:arguments>
- <cd:keywords optional="yes">
- <cd:constant type="cd:text"/>
- </cd:keywords>
- <cd:assignments list="yes">
- <cd:parameter name="Lines">
- <cd:constant type="cd:number"/>
- </cd:parameter>
- <cd:parameter name="Hang">
- <cd:constant type="cd:text"/>
- </cd:parameter>
- <cd:parameter name="Oversize">
- <cd:constant type="cd:text"/>
- </cd:parameter>
- <cd:parameter name="Raise">
- <cd:constant type="cd:text"/>
- </cd:parameter>
- <cd:parameter name="Findent">
- <cd:constant type="cd:dimension"/>
- </cd:parameter>
- <cd:parameter name="Nindent">
- <cd:constant type="cd:dimension"/>
- </cd:parameter>
- <cd:parameter name="Slope">
- <cd:constant type="cd:dimension"/>
- </cd:parameter>
- <cd:parameter name="Ante">
- <cd:constant type="cd:text"/>
- </cd:parameter>
- <cd:parameter name="FontHook">
- <cd:constant type="cd:command"/>
- </cd:parameter>
- <cd:parameter name="TextFont">
- <cd:constant type="cd:command"/>
- </cd:parameter>
- <cd:parameter name="Image">
- <cd:constant type="yes"/>
- <cd:constant type="no" default="yes"/>
- </cd:parameter>
- </cd:assignments>
- </cd:arguments>
-</cd:command>
-<cd:command name="lettrine" file="t-lettrine.tex">
- <cd:sequence>
- <cd:string value="lettrine"/>
- </cd:sequence>
- <cd:arguments>
- <cd:assignments list="yes" optional="yes">
- <cd:inherit name="setuplettrine"/>
- </cd:assignments>
- <cd:content/>
- <cd:content/>
- </cd:arguments>
-</cd:command>
-</cd:interface>
diff --git a/Master/texmf-dist/tex/context/third/lettrine/t-lettrine.tex b/Master/texmf-dist/tex/context/third/lettrine/t-lettrine.tex
deleted file mode 100644
index 11abf509429..00000000000
--- a/Master/texmf-dist/tex/context/third/lettrine/t-lettrine.tex
+++ /dev/null
@@ -1,163 +0,0 @@
-%D \module
-%D [ file=t-lettri,
-%D version=2009.01.20,
-%D title=\CONTEXT\ Lettrines,
-%D subtitle=Funny stuff,
-%D author=Taco Hoekwater,
-%D date=\currentdate,
-%D copyright=Public Domain]
-%C
-%C Donated to the public domain.
-
-%D This is just a quick and dirty conversion of the LaTeX package
-%D
-%D \ProvidesFile{lettrine.sty}[2004/05/22 v1.6 (D. Flipo)]
-%D
-%D Errors are likely mine, credit is due to Daniel.Flipo@univ-lille1.fr
-%D
-%D If enough people like it, I may even clean this mess up sometime. The
-%D current version is just a (c)rude conversion of the low-level LaTeX
-%D stuff to sometimes even lower-level ConTeXt.
-%D
-%D Changes:
-%D 2005.08.29: support use within \startframedtext ..\stop
-%D 2006.01.27: support use within \startnarrower..\stop
-%D 2009.01.20: fix indentation after indented dropcaps
-
-\unprotect
-
-\newbox\Lettrinelbox
-\newbox\Lettrinetbox
-
-\newcount\Lettrinelines
-
-\newdimen\LettrineHeight
-\newdimen\Lettrinefirst
-\newdimen\Lettrinenext
-\newdimen\Lettrineraise
-
-\newdimen\Lettrinepindent
-\newdimen\Lettrinefindent
-\newdimen\Lettrinenindent
-
-\getparameters[LettrineDefault]
- [Lines=2,
- Hang=0,
- Oversize=0,
- Raise=0,
- Findent=0pt,
- Nindent=0.5em,
- Slope=0pt,
- Ante=,
- FontHook=,
- TextFont=\sc,
- Image=\v!no]
-
-\def\setuplettrine{\dodoubleempty\dosetuplettrine}
-
-\def\dosetuplettrine[#1][#2]{%
- \doifassignmentelse{#1}{%
- \dodosetuplettrine[][#1]%
- }{%
- \def\ascii{}%
- \doifsomething{#1}{\convertargument#1\to\ascii }%
- \expandafter\dodosetuplettrine\expandafter[\ascii][#2]%
- }%
-}
-
-
-\def\dodosetuplettrine[#1][#2]{%
- \getparameters[LettrineDefault#1][#2]
-}
-
-\def\doLettrineHeight{%
- \LettrineHeight =\Lettrinelines\baselineskip\relax
- \ifnum\Lettrinelines>1
- \advance\LettrineHeight -\baselineskip
- \fi
- \setbox\Lettrinetbox\hbox{{\LettrineTextFont x}}%
- \LettrineHeight = \dimexpr \LettrineHeight+ \ht\Lettrinetbox +
- \LettrineOversize\LettrineHeight \relax
-}
-
-\def\doLettrineEPS#1{%
- \doLettrineHeight\LettrineFontHook
- \externalfigure[#1][\c!height=\LettrineHeight]}
-
-\def\doLettrineFont{%
- \doLettrineHeight
- \definefontsynonym[LettrineFont][Serif]%
- \setbox\Lettrinetbox=\hbox{{\LettrineFontHook
- \definedfont[LettrineFont at \the\LettrineHeight] X}}%
- \scratchcounter = \numexpr (100*\LettrineHeight)/(\ht\Lettrinetbox/100) - 9999\relax
- \ifnum\scratchcounter>0
- \def\tempa{1.\the\scratchcounter}%
- \else
- \def\tempa{1}%
- \fi
- \LettrineFontHook
- \!!dimena = \tempa\LettrineHeight
- \definedfont[LettrineFont at \the\!!dimena]%
-}%
-
-\def\lettrine{\dosingleempty\dolettrine}
-
-\def\dolettrine[#1]#2#3{%
- \convertargument#2\to\ascii
- \def\lettrgetparam##1{%
- \ifcsname LettrineDefault\ascii##1\endcsname
- \setevalue{Lettrine##1}{\csname LettrineDefault\ascii##1\endcsname}%
- \else
- \setevalue{Lettrine##1}{\csname LettrineDefault##1\endcsname}%
- \fi}%
- \processcommalist
- [Lines,Hang,Oversize,Raise,Findent,Nindent,Slope,Ante,FontHook,TextFont,Image]\lettrgetparam
- \getparameters[Lettrine][#1]%
- \Lettrinenindent=\LettrineNindent\relax
- \Lettrinefindent=\LettrineFindent\relax
- \Lettrinelines =\LettrineLines\relax
- \setbox\Lettrinelbox\hbox{{\ifx\LettrineImage\v!yes\doLettrineEPS{#2}\else
- \ifx\LettrineImage\v!true\doLettrineEPS{#2}\else
- \doLettrineFont #2\fi\fi}}%
- \setbox\Lettrinetbox\hbox{{\LettrineTextFont{#3}}}%
- \ifnum\Lettrinelines=1
- \Lettrinefirst = \dimexpr \ht\Lettrinelbox-\ht\Lettrinetbox \relax
- \Lettrineraise=0pt
- \else
- \setbox\scratchbox\hbox{{\LettrineTextFont x}}%
- \Lettrinefirst = \dimexpr -\Lettrinelines\baselineskip + \baselineskip
- -\ht\scratchbox \relax
- \Lettrineraise = \dimexpr\LettrineRaise\Lettrinefirst \relax
- \Lettrineraise = -\Lettrineraise \relax
- \Lettrinefirst = \dimexpr\Lettrinefirst+\Lettrineraise+\ht\Lettrinelbox \relax
- \Lettrineraise = \dimexpr\Lettrineraise-\Lettrinelines\baselineskip +\baselineskip \relax
- \fi
- \par
- \ifdim\Lettrinefirst>0.2pt\vskip\Lettrinefirst\fi
- \setbox\scratchbox= \hbox{\LettrineAnte}%
- \setlocalhsize
- \Lettrinepindent= \dimexpr \wd\Lettrinelbox -\LettrineHang\wd\Lettrinelbox +
- \wd\scratchbox + \Lettrinefindent \relax
- \Lettrinefirst=\dimexpr \localhsize -\Lettrinepindent +\rightskip+\leftskip\relax
- \advance\Lettrinenindent \Lettrinepindent
- \Lettrinenext=\dimexpr \localhsize -\Lettrinenindent +\rightskip+\leftskip\relax
- \def\Lparshape{\the\numexpr\Lettrinelines+1\relax\space \the\Lettrinepindent\space \the\Lettrinefirst}%
- \dorecurse{\numexpr \Lettrinelines - 1 \relax}{%
- \edef\Lparshape{\Lparshape\space \the\Lettrinenindent\space \the\Lettrinenext}%
- \advance\Lettrinenindent\LettrineSlope
- \advance\Lettrinenext -\LettrineSlope
- }%
- \edef\Lparshape{\Lparshape\space 0pt\space \the\localhsize}%
- \setbox\scratchbox = \hbox{\hbox{\LettrineAnte}\raise \Lettrineraise \hbox{\box\Lettrinelbox }}%
- \scratchdimen = \dimexpr \dp\scratchbox + \ht\strutbox + 1pt\relax
- \vskip\scratchdimen \penalty0\vskip-\scratchdimen
- \noindent
- \scratchdimen = \leftskip \leftskip=\scratchdimen
- \scratchdimen = \rightskip \rightskip=\scratchdimen
- \parshape=\Lparshape
- \smash{\llap{\box\scratchbox \hskip \the\Lettrinefindent}}%
- \box\Lettrinetbox
-}
-
-\protect
-\endinput