Permalink
Browse files

Add support for "config.default" file to hold default arguments to Co…

…nfigure.pl.
  • Loading branch information...
1 parent b3f66e1 commit 0579b5641b1e52659cef82cc54803dc5ff59a05b @pmichaud pmichaud committed Jun 9, 2011
Showing with 6 additions and 0 deletions.
  1. +1 −0 .gitignore
  2. +5 −0 Configure.pl
View
@@ -48,3 +48,4 @@ lib/DateTime/strftime.pir
lib/Safe.pir
rakudo_test_run.tar.gz
config.status
+config.default
View
@@ -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);

0 comments on commit 0579b56

Please sign in to comment.