summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2008-10-07 00:13:53 +0000
committerNorbert Preining <preining@logic.at>2008-10-07 00:13:53 +0000
commite632c1f246bc559665a6be6f6ff365bfdd4d0ebf (patch)
treefe5fa863d7bc950dcefea26dd70c7dd0527e38da /Master/tlpkg/TeXLive
parenta75ea875cafc75a740a6f4d68466cd7f194eba5b (diff)
make TLPDB warning simpler
git-svn-id: svn://tug.org/texlive/trunk@10875 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive')
-rw-r--r--Master/tlpkg/TeXLive/TLPDB.pm11
1 files changed, 1 insertions, 10 deletions
diff --git a/Master/tlpkg/TeXLive/TLPDB.pm b/Master/tlpkg/TeXLive/TLPDB.pm
index 3caabf25ca3..d29d939ca6b 100644
--- a/Master/tlpkg/TeXLive/TLPDB.pm
+++ b/Master/tlpkg/TeXLive/TLPDB.pm
@@ -271,16 +271,7 @@ sub from_file {
$found++;
}
} until (!$ret);
- if (!$found) {
- if ($path =~ m/^http|ftp/i) {
- tlwarn("Bad URL, ");
- } else {
- tlwarn("Bad path, ");
- }
- tlwarn("cannot read any package from\n");
- tlwarn("\t$path\n");
- tlwarn("seems not to be a TLPDB!\n");
- }
+ tlwarn("unusable location $path, could not load any packages\n") if (!$found);
# remove the un-lzma-ed tlpdb file from temp dir
# THAT IS RACY!!! we should fix that in some better way with tempfile
unlink($tlpdbfile) if $tlpdbfile;