1 files changed, 8 insertions, 3 deletions
diff --git a/bin/problem-creation-graph b/bin/problem-creation-graph
index e1b6f2cc4..c3d10f934 100755
--- a/bin/problem-creation-graph
+++ b/bin/problem-creation-graph
@@ -10,13 +10,18 @@ use strict;
 use warnings;
 require 5.8.0;
 
-use FindBin;
+BEGIN {
+    use File::Basename qw(dirname);
+    use File::Spec;
+    my $d = dirname(File::Spec->rel2abs($0));
+    chdir "$d/..";
+    require "$d/../setenv.pl";
+}
+
 use File::Temp qw(tempfile);
 
 use FixMyStreet::App;
 
-chdir("$FindBin::Bin/../");
-
 my %config = (
     gplot_output => "set terminal png font 'Vera.ttf' 9 size 1200,400",
     extension => '.png',