summaryrefslogtreecommitdiffstats
path: root/perl-install/commands.pm
diff options
context:
space:
mode:
authorpad <pad@mandriva.com>1999-09-05 22:59:26 +0000
committerpad <pad@mandriva.com>1999-09-05 22:59:26 +0000
commit5798823e331c86fb3f97593b0cd2820224767d15 (patch)
tree5dccbae0c0d401beeb09a46154847884e1f474b3 /perl-install/commands.pm
parent38dce4a6d02d689b7aefa2b5f925ac5441c51a89 (diff)
downloaddrakx-5798823e331c86fb3f97593b0cd2820224767d15.tar
drakx-5798823e331c86fb3f97593b0cd2820224767d15.tar.gz
drakx-5798823e331c86fb3f97593b0cd2820224767d15.tar.bz2
drakx-5798823e331c86fb3f97593b0cd2820224767d15.tar.xz
drakx-5798823e331c86fb3f97593b0cd2820224767d15.zip
focus_out
Diffstat (limited to 'perl-install/commands.pm')
-rw-r--r--perl-install/commands.pm2
1 files changed, 0 insertions, 2 deletions
diff --git a/perl-install/commands.pm b/perl-install/commands.pm
index bd511c850..b345acacb 100644
--- a/perl-install/commands.pm
+++ b/perl-install/commands.pm
@@ -10,7 +10,6 @@ my $BUFFER_SIZE = 1024;
1;
-
sub getopts {
my $o = shift;
my @r = map { '' } (@_ = split //, $_[0]);
@@ -212,7 +211,6 @@ sub ls {
} else { print "$_\n"; }
}
}
-
sub cp {
my ($force) = getopts(\@_, qw(f));
@_ >= 2 or die "usage: cp [-f] <sources> <dest>\n(this cp does -Rl by default)\n";