From 3201302ad8784d80b35cac2f0db413a1b56fe241 Mon Sep 17 00:00:00 2001
From: Brad Fitzpatrick <brad@danga.com>
Date: Wed, 5 Jan 2011 08:21:27 -0800
Subject: [PATCH] build.pl: chdir to root before building

---
 build.pl | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/build.pl b/build.pl
index 305e30ea2..ba3f9bf2d 100755
--- a/build.pl
+++ b/build.pl
@@ -2,11 +2,14 @@
 
 use strict;
 use Getopt::Long;
+use FindBin;
 
 my $opt_list;
 my $opt_eachclean;
 my $opt_verbose;
 
+chdir($FindBin::Bin) or die "Couldn't chdir to $FindBin::Bin: $!";
+
 GetOptions("list" => \$opt_list,
            "eachclean" => \$opt_eachclean,
            "verbose" => \$opt_verbose,