From ea7d949134c8ec7d0aea3712c8dd8c3f14a1b0b7 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Thu, 13 Sep 2007 18:23:02 +0000 Subject: dvdcoll update (12sep07) git-svn-id: svn://tug.org/texlive/trunk@4939 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/latex/dvdcoll/dcwrtbib.sty | 18 ++++++++++++++---- 1 file changed, 14 insertions(+), 4 deletions(-) (limited to 'Master/texmf-dist/tex/latex/dvdcoll') 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% -- cgit v1.2.3