1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
|
%\iffalse % MetaComment
%%
%% + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
%% | Copyright(C) 1997-2010 by F. Bosisio |
%% | |
%% | This program can be redistributed and/or modified under |
%% | the terms of the LaTeX Project Public License, either |
%% | version 1.3 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.3 or later is part of all LaTeX distributions |
%% | version 2005/12/01 or later. |
%% | |
%% | This work has the LPPL maintenance status `maintained'. |
%% | The Current Maintainer of this work is F. Bosisio. |
%% | |
%% | This work consists of files quotes.dtx and quotes.html |
%% | and of the derived files quotes.sty and quotes.pdf. |
%% | |
%% | E-mail: fbosisio@bigfoot.com |
%% | CTAN location: macros/latex/contrib/bosisio/ |
%% + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
%%
%% If you make any improvment, find any bug or have
%% any suggestion, please let me know about it.
%%
%<*package,driver>
%\fi
%
\def\FileName{quotes}
%\iffalse % MetaComment
%</package,driver>
%<*package>
%\fi
\def\fileversion{2.2}
\def\filedate{1997/12/20}
\def\docdate{2005/04/09}
\def\filedescr{Commands to use double quotes (FB)}
%
%\iffalse % MetaComment
%</package>
%<*dtx>
%- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
% This section is the installation driver
%
\def\batchfile{\FileName.dtx}
%
\input docstrip
%
\keepsilent
% \askforoverwritefalse
%
\generateFile{\FileName.sty}{f}{\from{\FileName.dtx}{package}}
%
\generateFile{\FileName.drv}{f}{\from{\FileName.dtx}{driver}}
%
\Msg{******************************************************}
\Msg{*}
\Msg{* To produce the documentation run the}
\Msg{* file `\FileName.drv' through LaTeX.}
\Msg{*}
\Msg{******************************************************}
%
\endbatchfile
%
% End of the installation driver
%- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
%</dtx>
%
% This section is the documentation driver
%
%<+driver>\documentclass[12pt,a4paper]{ltxdoc}
%<+driver> \EnableCrossrefs
%<+driver> \CodelineIndex
%<+driver> \RecordChanges
%<+driver> %\OnlyDescription % Uncomment not to see the implementation
%<+driver>\begin{document}
%<+driver> \DocInput{\FileName.dtx}
%<+driver> \newpage
%<+driver> \PrintIndex
%<+driver> \PrintChanges
%<+driver>\end{document}
%
% End of the documentation driver
%- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
%<*package>
%\fi
%
% \changes{v0.1}{4 May 1997}{First release (basic accents-command)}
% \changes{v0.2}{20 August 1997}{Added double-quotes and extended-chars}
% \changes{v1.0}{5 September 1997}{Documentation added}
% \changes{v1.1}{7 November 1997}{Fixed a bug in the options}
% \changes{v2.0}{20 December 1997}{Separated from package ``quotes''}
% \changes{v2.1}{5 March 1999}{Added copyright notice and changed addresses}
% \changes{v2.2}{9 April 2005}{Usage of the double-quote character (") avoided}
%
% \MakeShortVerb{\|}
%
% \title{Package \texttt{\FileName}\thanks{This is version \fileversion,
% last revised \filedate; documentation date \docdate}}
% \author{F. Bosisio\\\normalsize E-mail: \texttt{fbosisio@bigfoot.com}}
% \date{\filedate}
% \maketitle
%
% \begin{abstract}
% Documentation for the package \texttt{\FileName}.
% \end{abstract}
%
% \section{Introduction}
% This package simplifies the use of double-quotes.
%
% \section{Double quotes}
%
% With this package, the character `` |"| '' generates the correct
% double-quote, i.e. the sequence $<<$| " text " |$>>$
% generates $<<$ `` |text| '' $>>$, so that this character
% can be used both for opening and closing the double-quotes
% (provided that it is \emph{always} used).
%
% \StopEventually{}
% \newpage
% \section{Implementation}
%
% \begin{macrocode}
%%
\NeedsTeXFormat{LaTeX2e}[1995/12/01]
\ProvidesPackage{\FileName}[\filedate\space v\fileversion\space\filedescr]
% \end{macrocode}
%
% \begin{macro}{Quotes}
% The command ``|\@VIRGOLETTE|'' is defined to print an open or close
% double-quotes alternatively, so that they are always right.
% Moreover, the double-quotes are always printed in upright-shape,
% since they looks better.
%
% \begin{macrocode}
%%
\newif\if@virgolette\@virgolettefalse
%%
\newcommand{\@VIRGOLETTE}{%
\if@virgolette%
\@virgolettefalse%
\textup{''}%
\else%
\@virgolettetrue%
\textup{``}%
\fi%
}
% \end{macrocode}
% Then the character `` |"| '' is associated to the command
% ``|\@VIRGOLETTE|'' just defined, so that you just have to type
% this character in order to get the right double-quotes.
% This trick has been adapted from the |doc| package, but
% perhaps it may be done in a better way.
% \begin{macrocode}
\@makeother " %% Can this command be eliminated ?
\begingroup
\catcode`\~\active \lccode`\~`\"%
\lowercase{%
\global\expandafter\let
\csname ac\string\"\endcsname~%
\gdef~{\@VIRGOLETTE}}%
\endgroup
\global\catcode`\"\active
%
% \end{macrocode}
% \end{macro}
%
%\iffalse % MetaComment
%<*package>
%\fi
%
% \CheckSum{43}
% \Finale
%
\endinput
|