summaryrefslogtreecommitdiff
path: root/language/korean/kotex-utf/contrib/dhucs-setspace.sty
diff options
context:
space:
mode:
Diffstat (limited to 'language/korean/kotex-utf/contrib/dhucs-setspace.sty')
-rw-r--r--language/korean/kotex-utf/contrib/dhucs-setspace.sty204
1 files changed, 204 insertions, 0 deletions
diff --git a/language/korean/kotex-utf/contrib/dhucs-setspace.sty b/language/korean/kotex-utf/contrib/dhucs-setspace.sty
new file mode 100644
index 0000000000..8d54e2a29e
--- /dev/null
+++ b/language/korean/kotex-utf/contrib/dhucs-setspace.sty
@@ -0,0 +1,204 @@
+%% File `dhucs-secspace.sty`
+%%
+%% Copyright (C) 2007-2013 Kangsoo Kim <karnes at ktug org>
+%%
+%% This work may be distributed and/or modified under the
+%% conditions of the LaTeX Project Public License, either version 1.3c
+%% of this license or (at your option) any later version.
+%% The latest version of this license is in
+%% http://www.latex-project.org/lppl.txt
+%% and version 1.3c or later is part of all distributions of LaTeX
+%% version 2006/05/20 or later.
+%%
+\NeedsTeXFormat{LaTeX2e}[1994/12/01]
+\def\filename{dhucs-setspace.sty}
+\def\filedate{2007/09/21}
+\def\fileversion{0.11}
+\ProvidesPackage{dhucs-setspace}[\filedate\space\fileversion\space
+ Line Spacing control of ko.TeX]
+
+\newif\if@singlespacefn\@singlespacefntrue
+\DeclareOption{nofloatspacing}{\@singlespacefnfalse}
+\newif\if@singlespacequote\@singlespacequotetrue
+\DeclareOption{noquotespacing}{\@singlespacequotefalse}
+\newif\if@hangul\@hangulfalse
+\DeclareOption{hangul}{\@hangultrue\AtEndOfPackage{\hangulspacing}}
+\newif\if@adjustfootnotesep\@adjustfootnotesepfalse
+\DeclareOption{adjustfootnotesep}{\@adjustfootnoteseptrue}
+\newif\if@adjustverbatim\@adjustverbatimfalse
+\DeclareOption{adjustverbatim}{\@adjustverbatimtrue}
+
+\DeclareOption*{\PassOptionsToPackage{\CurrentOptions}{setspace}}
+
+\ProcessOptions
+
+% |dhucs-interword|가 로드되지 않았을 경우를 대비하여
+\ifx\undefined\ucsfninterwordhook
+ \providecommand{\ucsfninterwordhook}{}%
+\fi
+
+\RequirePackage{setspace}
+
+%% Karnes.
+\newcommand{\Set@Hangulspace}[2]{%
+ \def\setspace@hangulspace{#1}%
+ \def\setspace@hangulfspace{#2}%
+ \setstretch{#1}%
+}
+
+\def\SetHangulspace#1#2{%
+ \AtBeginDocument{%
+ \gdef\setspace@hangulspace{#1}%
+ \gdef\setspace@hangulfspace{#2}%
+ }%
+ \setstretch{#1}%
+}
+
+\newcommand{\SetHangulVerbatimSpace}[1]{%
+ \def\setspace@hangulverbspace{#1}%
+}
+
+\if@hangul
+\Set@Hangulspace{1.333}{1.2}
+\else
+\Set@Hangulspace{1.0}{1.0}
+\fi
+
+\newcommand{\hangulspacing}{%
+ \setstretch{\setspace@hangulspace}% default
+}
+
+\newcommand{\hangulfspacing}{%
+ \setstretch{\setspace@hangulfspace}%
+}
+
+\newcommand{\hangulverbspacing}{%
+ \setstretch{\setspace@hangulverbspace}%
+}
+
+%% adjust verbatim
+%% if and only if [nofloatspacing] and [adjustverbatim] is on,
+%% the verbatim will be the same to the main text linestretch.
+%% if [hangul] it will adjust the linestretch to the quote or quotation
+%% the other case, it will be 1.0, I hope.
+%%
+\if@adjustverbatim
+\SetHangulVerbatimSpace{\setspace@hangulfspace}%
+\else
+\SetHangulVerbatimSpace{1.0}
+\fi
+
+%\let\latex@xfloat=\@xfloat
+\if@singlespacefn
+\def\@xfloat #1[#2]{%
+ \latex@xfloat #1[#2]%
+ \def\baselinestretch {\setspace@hangulfspace}%
+ \normalsize
+}
+\else
+ \let\@xfloat=\latex@xfloat
+\fi
+
+\if@adjustfootnotesep
+\if@hangul
+\if@singlespacefn
+ \ifcase \@ptsize \relax
+ \setlength\footnotesep{8.51 pt}% 10pt
+ \or
+ \setlength\footnotesep{9.6 pt}% 11pt
+ \or
+ \setlength\footnotesep{10.3 pt}% 12pt
+ \fi
+\else
+\fi
+\else\fi
+\else\fi
+
+\if@singlespacefn
+\long\def\@footnotetext#1{%
+ \insert\footins{%
+% GT: Next line added. Hook desired here!
+ \def\baselinestretch {\setspace@hangulfspace}%
+ \ucsfninterwordhook
+% \@SetFloatspaces
+ \reset@font\footnotesize
+ \interlinepenalty\interfootnotelinepenalty
+ \splittopskip\footnotesep
+ \splitmaxdepth \dp\strutbox \floatingpenalty \@MM
+ \hsize\columnwidth
+ \@parboxrestore
+ \protected@edef\@currentlabel{%
+ \csname p@footnote\endcsname\@thefnmark
+ }%
+ \color@begingroup
+ \@makefntext{%
+ \rule\z@\footnotesep\ignorespaces#1\@finalstrut\strutbox}%
+ \color@endgroup}}
+
+% Minipage footnotes.
+
+\long\def\@mpfootnotetext#1{%
+ \global\setbox\@mpfootins\vbox{%
+ \unvbox \@mpfootins
+% GT: Next line added. Hook desired here!
+ \def\baselinestretch {\setspace@hangulfspace}%
+ \ucsfninterwordhook
+% \@SetFloatspaces
+ \reset@font\footnotesize
+ \hsize\columnwidth
+ \@parboxrestore
+ \protected@edef\@currentlabel{%
+ \csname p@mpfootnote\endcsname\@thefnmark}%
+ \color@begingroup
+ \@makefntext{%
+ \rule\z@\footnotesep\ignorespaces#1\@finalstrut\strutbox}%
+ \color@endgroup}}
+
+\else\fi
+
+\def\@quotespacinghook{%
+ \if@singlespacequote%
+ \hangulfspacing%
+ \else%
+ \hangulspacing%
+ \fi%
+}
+
+\renewenvironment{quotation}
+ {\list{}{\listparindent 1.5em%
+ \itemindent \listparindent
+ \rightmargin \leftmargin
+ \parsep \z@ \@plus\p@}%
+ \item\relax
+ \@quotespacinghook%
+ }
+ {\endlist}
+\renewenvironment{quote}
+ {\list{}{\rightmargin\leftmargin}%
+ \item\relax
+ \@quotespacinghook%
+ }
+ {\endlist}
+
+\def\@verbatim{\trivlist
+ \if@adjustverbatim\hangulverbspacing\else\fi%
+ \item\relax
+ \if@minipage\else\vskip\parskip\fi
+ \leftskip\@totalleftmargin\rightskip\z@skip
+ \parindent\z@\parfillskip\@flushglue\parskip\z@skip
+ \@@par
+ \@tempswafalse
+ \def\par{%
+ \if@tempswa
+ \leavevmode \null \@@par\penalty\interlinepenalty
+ \else
+ \@tempswatrue
+ \ifhmode\@@par\penalty\interlinepenalty\fi
+ \fi}%
+ \let\do\@makeother \dospecials
+ \obeylines \verbatim@font \@noligs
+ \hyphenchar\font\m@ne
+ \everypar \expandafter{\the\everypar \unpenalty}%
+}
+
+\endinput