Bug 744338: jobqueue.pl won't work if not called from the bugzilla/ root directory

r/a=LpSolit

Bug 744338: jobqueue.pl won't work if not called from the bugzilla/ root directory
2b222a69 · Håkan Jerning · Frédéric Buclin · 92a81752 · 2b222a69
Commit 2b222a69 authored May 07, 2012 by Håkan Jerning Committed by Frédéric Buclin May 07, 2012
Hide whitespace changes
Inline Side-by-side

Showing with 7 additions and 1 deletion

jobqueue.pl jobqueue.pl +7 -1

No files found.
--- a/jobqueue.pl
+++ b/jobqueue.pl
@@ -7,8 +7,14 @@
 # defined by the Mozilla Public License, v. 2.0.

 use strict;
+
+use Cwd qw(abs_path);
 use File::Basename;
-BEGIN { chdir dirname($0); }
+BEGIN {
+    # Untaint the abs_path.
+    my ($a) = abs_path($0) =~ /^(.*)$/;
+    chdir dirname($a);
+}

 use lib qw(. lib);
 use Bugzilla;