diff options
author | Karl Berry <karl@freefriends.org> | 2007-09-13 18:23:02 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2007-09-13 18:23:02 +0000 |
commit | ea7d949134c8ec7d0aea3712c8dd8c3f14a1b0b7 (patch) | |
tree | 35088201836c7aff44c4754db6c1e3605386e316 /Master/texmf-dist/tex | |
parent | 70e30e58b42115143a9674352946af0eb19f21dc (diff) |
dvdcoll update (12sep07)
git-svn-id: svn://tug.org/texlive/trunk@4939 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex')
-rw-r--r-- | Master/texmf-dist/tex/latex/dvdcoll/dcwrtbib.sty | 18 |
1 files changed, 14 insertions, 4 deletions
diff --git a/Master/texmf-dist/tex/latex/dvdcoll/dcwrtbib.sty b/Master/texmf-dist/tex/latex/dvdcoll/dcwrtbib.sty index 0e590333f07..dacafa4a01c 100644 --- a/Master/texmf-dist/tex/latex/dvdcoll/dcwrtbib.sty +++ b/Master/texmf-dist/tex/latex/dvdcoll/dcwrtbib.sty @@ -20,7 +20,7 @@ %% This work consists of all files listed in manifest.txt. %% % -\ProvidesPackage{dcwrtbib}[2007/02/10 dcwrtbib.sty v1.0 - Josef Kleber (C) 2007]% +\ProvidesPackage{dcwrtbib}[2007/04/12 dcwrtbib.sty v1.0adev - Josef Kleber (C) 2007]% % \RequirePackage{afterpage}% % @@ -28,9 +28,19 @@ % \immediate\openout\dc@bibout=dc_\jobname.bib\relax% % -\newcommand{\bibwrite}[1]% -{% - \immediate\write\dc@bibout{#1}% +\newcommand*{\bibwrite}[1]{% + \begingroup + \csname @safe@activestrue\endcsname % babel's shorthands + \count@=128 % + \loop + \ifnum\count@<256 + \lccode`\~=\count@ + \lowercase{\edef~{\string~}}% + \advance\count@ by 1 % + \repeat + \immediate\write\dc@bibout{#1}% + \endgroup + %\immediate\write\dc@bibout{\detokenize{#1}}% }% % \AtEndDocument% |