[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index] [Thread Index]

Bug#1002963: [PATCH] local-debbugs: use FindBin



Package: debbugs

This allows running of it from the git tree directly.
---
 bin/local-debbugs | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/bin/local-debbugs b/bin/local-debbugs
index 3e397f38999b..69406dd74585 100755
--- a/bin/local-debbugs
+++ b/bin/local-debbugs
@@ -122,6 +122,8 @@ use IPC::Run;
 use IO::File;
 use File::Path;
 use File::Spec;
+use FindBin;
+use lib "$FindBin::Bin/../lib";
 
 my %options = (debug           => 0,
 	       help            => 0,
@@ -162,8 +164,8 @@ if ($options{git_mode}) {
     $options{template_dir} = "/usr/share/debbugs/templates";
 }
 
-eval "use Debbugs::Common qw(checkpid lockpid get_hashname)";
-eval "use Debbugs::Mail qw(get_addresses)";
+use Debbugs::Common qw(checkpid lockpid get_hashname);
+use Debbugs::Mail qw(get_addresses);
 
 pod2usage() if $options{help};
 pod2usage({verbose=>2}) if $options{man};
-- 
2.33.0


Reply to: