From 0579b5641b1e52659cef82cc54803dc5ff59a05b Mon Sep 17 00:00:00 2001
From: pmichaud <pmichaud@pobox.com>
Date: Wed, 8 Jun 2011 20:41:37 -0500
Subject: [PATCH] Add support for "config.default" file to hold default
 arguments to Configure.pl.

---
 .gitignore   | 1 +
 Configure.pl | 5 +++++
 2 files changed, 6 insertions(+)

diff --git a/.gitignore b/.gitignore
index 7b4b644c150..7796aacb6e8 100644
--- a/.gitignore
+++ b/.gitignore
@@ -48,3 +48,4 @@ lib/DateTime/strftime.pir
 lib/Safe.pir
 rakudo_test_run.tar.gz
 config.status
+config.default
diff --git a/Configure.pl b/Configure.pl
index 4cace104210..1f64d4a4c96 100644
--- a/Configure.pl
+++ b/Configure.pl
@@ -4,6 +4,7 @@
 use 5.008;
 use strict;
 use warnings;
+use Text::ParseWords;
 use Getopt::Long;
 use Cwd;
 use lib "tools/lib";
@@ -16,6 +17,10 @@
 my $uclang = uc $lang;
 
 MAIN: {
+    if (-r "config.default") {
+        unshift @ARGV, shellwords(slurp('config.default'));
+    }
+
     my %config;
     my $config_status = "${lclang}_config_status";
     $config{$config_status} = join(' ', map { "\"$_\""} @ARGV);