summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive/TLPSRC.pm
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2007-07-14 00:42:03 +0000
committerKarl Berry <karl@freefriends.org>2007-07-14 00:42:03 +0000
commit2313bd00ab9da753daf0438ef410f118831c59f5 (patch)
tree027f81bad5d0f322b069d2f805919f4a608022d0 /Master/tlpkg/TeXLive/TLPSRC.pm
parent2b4c681d78064c9f1f9ebcadd934c746347a9109 (diff)
no, we don't want this kind of remove here.
git-svn-id: svn://tug.org/texlive/trunk@4583 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TLPSRC.pm')
-rw-r--r--Master/tlpkg/TeXLive/TLPSRC.pm20
1 files changed, 1 insertions, 19 deletions
diff --git a/Master/tlpkg/TeXLive/TLPSRC.pm b/Master/tlpkg/TeXLive/TLPSRC.pm
index c943b02dd88..24456aa7e5c 100644
--- a/Master/tlpkg/TeXLive/TLPSRC.pm
+++ b/Master/tlpkg/TeXLive/TLPSRC.pm
@@ -132,19 +132,6 @@ sub from_file
}
-sub remove
-{
- my $self = shift;
- my $srcfile = $self->{"_srcfile"};
- die "no _srcfile for tlpsrc object" unless $srcfile;
- if (unlink ($srcfile) == 0) {
- print "unlink($srcfile) ok.\n";
- } else {
- warn "unlink($srcfile) failed: $!";
- }
-}
-
-
sub writeout
{
my $self = shift;
@@ -191,7 +178,7 @@ sub writeout
}
-# the hard work, generate a TLP file
+# the hard work, generate the TLPOBJ data.
#
sub make_tlpobj
{
@@ -430,7 +417,6 @@ TeXLive::TLPSRC - TeX Live Package Source access module
my $tlpsrc = TeXLive::TLPSRC->new( name => "foobar" );
$tlpsrc->from_file("/some/tlpsrc/package.tlpsrc");
$tlpsrc->from_file("package");
- $tlpsrc->remove;
$tlpsrc->writeout;
$tlpsrc->writeout(\*FILEHANDLE);
@@ -671,10 +657,6 @@ sibling of the C<TeXLive> package directory where C<TLPSRC.pm> was found.
$tlpsrc->from_file("/path/to/the/tlpsrc/somepkg.tlpsrc");
$tlpsrc->from_file("somepkg");
-=item C<remove>
-removes the file for this C<TLPSRC> object from disk. It does not
-update any database (or anything else).
-
=item C<writeout>
writes the textual representation of a C<TLPSRC> object to stdout, or the
filehandle if given: