aboutsummaryrefslogtreecommitdiff
path: root/SBO-Lib/lib/SBO/App
diff options
context:
space:
mode:
Diffstat (limited to 'SBO-Lib/lib/SBO/App')
-rwxr-xr-xSBO-Lib/lib/SBO/App/Remove.pm1
-rwxr-xr-xSBO-Lib/lib/SBO/App/Snap.pm5
2 files changed, 4 insertions, 2 deletions
diff --git a/SBO-Lib/lib/SBO/App/Remove.pm b/SBO-Lib/lib/SBO/App/Remove.pm
index a660035..cc3d303 100755
--- a/SBO-Lib/lib/SBO/App/Remove.pm
+++ b/SBO-Lib/lib/SBO/App/Remove.pm
@@ -16,6 +16,7 @@ use Getopt::Long qw(GetOptionsFromArray :config bundling);
use parent 'SBO::App';
sub _parse_opts {
+ my $class = shift;
my @ARGS = @_;
my ($help, $vers, $non_int, $alwaysask);
diff --git a/SBO-Lib/lib/SBO/App/Snap.pm b/SBO-Lib/lib/SBO/App/Snap.pm
index a00f977..f065a4c 100755
--- a/SBO-Lib/lib/SBO/App/Snap.pm
+++ b/SBO-Lib/lib/SBO/App/Snap.pm
@@ -1,5 +1,5 @@
-#!/usr/bin/perl
-#
+package SBO::App::Snap;
+
# vim: ts=2:et
#
# sbosnap
@@ -19,6 +19,7 @@ use Getopt::Long qw/ GetOptionsFromArray /;
use parent 'SBO::App';
sub _parse_opts {
+ my $class = shift;
my @ARGS = @_;
my ($help, $vers);