summaryrefslogtreecommitdiffstats
path: root/lib/OpenSLX/Utils.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/OpenSLX/Utils.pm')
-rw-r--r--lib/OpenSLX/Utils.pm8
1 files changed, 3 insertions, 5 deletions
diff --git a/lib/OpenSLX/Utils.pm b/lib/OpenSLX/Utils.pm
index 9686a152..8b3754bf 100644
--- a/lib/OpenSLX/Utils.pm
+++ b/lib/OpenSLX/Utils.pm
@@ -36,6 +36,7 @@ $VERSION = 1.01;
hostIs64Bit
getAvailableBusyboxApplets
grabLock
+ isPackInstalled pathOf isInPath
);
=head1 NAME
@@ -666,7 +667,6 @@ Returns the path of a binary it is installed in.
sub pathOf
{
- my $self = shift;
my $binary = shift;
return qx{which $binary 2>/dev/null};
@@ -680,10 +680,9 @@ Returns whether a binary is found.
sub isInPath
{
- my $self = shift;
my $binary = shift;
- my $path = $self->pathOf($binary);
+ my $path = pathOf($binary);
return $path ? 1 : 0;
}
@@ -697,9 +696,8 @@ the package mechanism of the given distribution!?
sub isPackInstalled
{
- my $self = shift;
my $pack = shift;
- return $self->isInPath($pack);
+ return isInPath($pack);
}
1;