diff options
| author | Norbert Preining <preining@logic.at> | 2008-05-19 20:42:47 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2008-05-19 20:42:47 +0000 |
| commit | 4166513a35fd66192b91fd667b3b386175bb9b5b (patch) | |
| tree | 0e641eb1e55ecfade52a27342a8df4f477b9ad7e /Master/tlpkg/TeXLive | |
| parent | 2abf9fc9bddef9695709cda32a88899699059d7d (diff) | |
fix some bugs in the logging code
git-svn-id: svn://tug.org/texlive/trunk@8238 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive')
| -rw-r--r-- | Master/tlpkg/TeXLive/TLMedia.pm | 4 | ||||
| -rw-r--r-- | Master/tlpkg/TeXLive/TLUtils.pm | 2 |
2 files changed, 4 insertions, 2 deletions
diff --git a/Master/tlpkg/TeXLive/TLMedia.pm b/Master/tlpkg/TeXLive/TLMedia.pm index 4b83b2db674..decf8303a6d 100644 --- a/Master/tlpkg/TeXLive/TLMedia.pm +++ b/Master/tlpkg/TeXLive/TLMedia.pm @@ -10,7 +10,7 @@ package TeXLive::TLMedia; use TeXLive::TLConfig; use TeXLive::TLPostActions; -use TeXLive::TLUtils qw(copy win32 dirname mkdirhier conv_to_win_path basename download_file merge_into); +use TeXLive::TLUtils qw(copy win32 dirname mkdirhier conv_to_win_path basename download_file merge_into debug ddebug info); use TeXLive::TLPDB; use Cwd qw/abs_path/; @@ -149,7 +149,7 @@ sub install_package { $container = "$location/$DiskArchive/$pkg.tar.lzma"; } else { # for now only warn and return, should (?) be die!? - tlwarn "Cannot find a package $pkg (.zip or .lzma) in $location/$DiskArchive\n"; + tlwarn("Cannot find a package $pkg (.zip or .lzma) in $location/$DiskArchive\n"); next; } } elsif (&media eq 'NET') { diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm index 082591c89bf..cef28264425 100644 --- a/Master/tlpkg/TeXLive/TLUtils.pm +++ b/Master/tlpkg/TeXLive/TLUtils.pm @@ -115,6 +115,8 @@ BEGIN { use TeXLive::TLConfig; use Getopt::Long; +$::opt_verbosity = 0; + =pod |