From beab87b40820270616d0f2995ab0295ee3f567a4 Mon Sep 17 00:00:00 2001 From: Dirk von Suchodoletz Date: Wed, 17 Dec 2008 22:59:06 +0000 Subject: .. git-svn-id: http://svn.openslx.org/svn/openslx/openslx/trunk@2434 95ad53e4-c205-0410-b2fa-d234c58c8868 --- lib/OpenSLX/Utils.pm | 14 -------------- 1 file changed, 14 deletions(-) (limited to 'lib') diff --git a/lib/OpenSLX/Utils.pm b/lib/OpenSLX/Utils.pm index 8b3754bf..109bec6a 100644 --- a/lib/OpenSLX/Utils.pm +++ b/lib/OpenSLX/Utils.pm @@ -668,7 +668,6 @@ Returns the path of a binary it is installed in. sub pathOf { my $binary = shift; - return qx{which $binary 2>/dev/null}; } @@ -681,23 +680,10 @@ Returns whether a binary is found. sub isInPath { my $binary = shift; - my $path = pathOf($binary); return $path ? 1 : 0; } -=item B - -Check whether a certain package is installed. Could be refined somehow to use -the package mechanism of the given distribution!? - -=cut - -sub isPackInstalled -{ - my $pack = shift; - return isInPath($pack); -} 1; -- cgit v1.2.3-55-g7522