Просмотр исходного кода

Use FindBin to provide relative lib resolution (for Fetch.pm)

Zachary Kotlarek 14 лет назад
Родитель
Сommit
72218ee9bf
2 измененных файлов с 4 добавлено и 0 удалено
  1. 2 0
      findTorrent.pl
  2. 2 0
      transmission.pl

+ 2 - 0
findTorrent.pl

@@ -10,6 +10,8 @@ my $MORE_NUMBER_FORMATS = 0;
 use JSON;
 use File::Temp;
 use File::Basename;
+use FindBin qw($Bin);
+use lib $Bin;
 use Fetch;
 
 # Prototypes

+ 2 - 0
transmission.pl

@@ -7,6 +7,8 @@ use JSON;
 use Date::Parse;
 use File::Temp qw/ :mktemp /;
 use File::Basename;
+use FindBin qw($Bin);
+use lib $Bin;
 use Fetch;
 
 # Prototypes