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

r/a=LpSolit

1 files changed, 7 insertions, 1 deletions

diff --git a/jobqueue.pl b/jobqueue.pl
index 3d495c422..775fe8dd6 100755
--- a/jobqueue.pl
+++ b/jobqueue.pl
@@ -22,8 +22,14 @@
 #   Max Kanat-Alexander <mkanat@bugzilla.org>
 
 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;