diff options
author | Norbert Preining <preining@logic.at> | 2008-07-12 21:00:34 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2008-07-12 21:00:34 +0000 |
commit | 8a9f8b6071af14eedacaadf2199f69fee225e4c9 (patch) | |
tree | 7648d606e742e8a0f67b85305f1d8eb8c59673bc | |
parent | f0e99b32e5a2854125e2fb5cbd67f21d98b8ddb0 (diff) |
TLUtils/tlmd5: warn if the file is not readable. That would have saved me
a lot of messages and trial/error cycles.
git-svn-id: svn://tug.org/texlive/trunk@9488 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r-- | Master/tlpkg/TeXLive/TLUtils.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm index 962737897dc..d40c49f271e 100644 --- a/Master/tlpkg/TeXLive/TLUtils.pm +++ b/Master/tlpkg/TeXLive/TLUtils.pm @@ -1666,6 +1666,7 @@ sub tlmd5 { return Digest::MD5->new->addfile(*FILE)->hexdigest; close(FILE); } else { + tlwarn("tlmd5, given file not readable: $file\n"); return ""; } } |