aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSergey Poznyakoff <gray@gnu.org.ua>2017-03-08 08:55:42 +0200
committerSergey Poznyakoff <gray@gnu.org.ua>2017-03-08 08:55:42 +0200
commit980ccd3e2749ffc0370388fb0bd2977c608d90b0 (patch)
tree682c9ca488d57cc0284f717dc751d469db2f612a
parent31d5e3b6439608b399a74695b9997d62af85cc9d (diff)
downloadbeam-980ccd3e2749ffc0370388fb0bd2977c608d90b0.tar.gz
beam-980ccd3e2749ffc0370388fb0bd2977c608d90b0.tar.bz2
Minor fixes
-rw-r--r--lib/App/Beam/Backup.pm3
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/App/Beam/Backup.pm b/lib/App/Beam/Backup.pm
index 7d217e0..78e62f4 100644
--- a/lib/App/Beam/Backup.pm
+++ b/lib/App/Beam/Backup.pm
@@ -6,9 +6,12 @@ use Carp;
require App::Beam;
our @ISA = qw(App::Beam);
+use Unix::Sysexits;
+
sub run {
my $self = shift;
+ shift; # Skip subcommand name
$self->abend(EX_USAGE, "bad number of arguments") if @_;
$self->lock();

Return to:

Send suggestions and report system problems to the System administrator.