Fixed library paths

bin/smadmin

@@ -17,15 +17,15 @@
 # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
 
 
+
 use strict;
 use warnings;
 
 
-# Set library directory
-use lib qw(
-	smradius
-	awitpt/lib
-);
+
+use FindBin;
+use lib "$FindBin::Bin/../share/perl5";
+
 
 
 # Check Config::IniFiles is instaslled

bin/smradclient

@@ -19,15 +19,18 @@
 use strict;
 use warnings;
 
-use lib('/usr/local/lib/smradius-0.0','/usr/lib/smradius-0.0',
-	'/usr/lib64/smradius-0.0','smradius','awitpt');
 
 
+use FindBin;
+use lib "$FindBin::Bin/../share/perl5";
+
 use smradius::client;
 
 
+
 smradius::client->run();
 
 
+
 1;
 # vim: ts=4

bin/smradiusd

@@ -17,16 +17,20 @@
 # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
 
 
+
 use strict;
 use warnings;
 
-use lib('/usr/local/lib/smradius-0.0','/usr/lib/smradius-0.0',
-	'/usr/lib64/smradius-0.0','smradius','awitpt/lib');
+
+
+use FindBin;
+use lib "$FindBin::Bin/../share/perl5";
 
 
 use smradius::daemon;
 
 
+
 smradius::daemon->run();