diff options
| author | Norbert Preining <preining@logic.at> | 2008-03-18 21:34:44 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2008-03-18 21:34:44 +0000 |
| commit | d0aa043c2500e3a3ef7515f204476313f6fb8cf8 (patch) | |
| tree | 14f5917130d4404039aa3df8dee603119352769f /Master/tlpkg/TeXLive/TLUtils.pm | |
| parent | f52d4161bfa79e362abfd014280aaa109d3227fb (diff) | |
fix % output in printf
git-svn-id: svn://tug.org/texlive/trunk@7013 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TLUtils.pm')
| -rw-r--r-- | Master/tlpkg/TeXLive/TLUtils.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm index 9e9bafca9c3..846bd45ffbe 100644 --- a/Master/tlpkg/TeXLive/TLUtils.pm +++ b/Master/tlpkg/TeXLive/TLUtils.pm @@ -1017,7 +1017,7 @@ sub create_language { open(OUTFILE,">$dest") or die("Cannot open $dest for writing: $!"); - printf OUTFILE "% Generated by %s on %s\n", "$0", scalar localtime; + printf OUTFILE "%% Generated by %s on %s\n", "$0", scalar localtime; print OUTFILE @lines; close(OUTFILE) || warn "close(>$dest) failed: $!"; } |