diff options
| -rw-r--r-- | perl-install/commands.pm | 7 |
1 files changed, 0 insertions, 7 deletions
diff --git a/perl-install/commands.pm b/perl-install/commands.pm index db3e5c2d2..e92fe73d8 100644 --- a/perl-install/commands.pm +++ b/perl-install/commands.pm @@ -149,13 +149,6 @@ sub swapoff { fs::swapoff($_[0]); } -sub uncpio { - @_ and die "uncpio reads from stdin\n"; - -# cpioInstallArchive(gzdopen(0, "r"), NULL, 0, NULL, NULL, &fail); -} - - sub rights { my $r = '-' x 9; my @rights = (qw(x w r x w r x w r), ['t', 0], ['s', 3], ['s', 6]); |