summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive/TLPSRC.pm
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2009-05-22 10:21:16 +0000
committerNorbert Preining <preining@logic.at>2009-05-22 10:21:16 +0000
commit643c19ccc0d63265b6610a8379dac9cae3b5e138 (patch)
treea6b14c4e1c1b60b83afac2ba6ba2fa2ea299e3f9 /Master/tlpkg/TeXLive/TLPSRC.pm
parent7a1cbc2ef3e12bd173d6f20546e1e7b28d805379 (diff)
place: create emtpy tlpsrc files since name and category are set
automatically TLPSRC: fix setting package name from empty tlpsrc file if the file name contains directories git-svn-id: svn://tug.org/texlive/trunk@13375 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TLPSRC.pm')
-rw-r--r--Master/tlpkg/TeXLive/TLPSRC.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/Master/tlpkg/TeXLive/TLPSRC.pm b/Master/tlpkg/TeXLive/TLPSRC.pm
index aa3d2d6a8e0..c39152b56e5 100644
--- a/Master/tlpkg/TeXLive/TLPSRC.pm
+++ b/Master/tlpkg/TeXLive/TLPSRC.pm
@@ -44,7 +44,8 @@ sub from_file
my $self = shift;
die "need exactly one filename for initialization" if @_ != 1;
my $srcfile = $_[0];
- (my $pkgname = $srcfile) =~ s/\.tlpsrc$//;
+ my $pkgname = TeXLive::TLUtils::basename($srcfile);
+ $pkgname =~ s/\.tlpsrc$//;
if (! -r "$srcfile") {
# if the argument is not readable as is, try looking for it in the