Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse code

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

…nfigure.pl.
  • Loading branch information...
commit 0579b5641b1e52659cef82cc54803dc5ff59a05b 1 parent b3f66e1
Patrick R. Michaud authored June 08, 2011

Showing 2 changed files with 6 additions and 0 deletions. Show diff stats Hide diff stats

  1. 1  .gitignore
  2. 5  Configure.pl
1  .gitignore
@@ -48,3 +48,4 @@ lib/DateTime/strftime.pir
48 48
 lib/Safe.pir
49 49
 rakudo_test_run.tar.gz
50 50
 config.status
  51
+config.default
5  Configure.pl
@@ -4,6 +4,7 @@
4 4
 use 5.008;
5 5
 use strict;
6 6
 use warnings;
  7
+use Text::ParseWords;
7 8
 use Getopt::Long;
8 9
 use Cwd;
9 10
 use lib "tools/lib";
@@ -16,6 +17,10 @@
16 17
 my $uclang = uc $lang;
17 18
 
18 19
 MAIN: {
  20
+    if (-r "config.default") {
  21
+        unshift @ARGV, shellwords(slurp('config.default'));
  22
+    }
  23
+
19 24
     my %config;
20 25
     my $config_status = "${lclang}_config_status";
21 26
     $config{$config_status} = join(' ', map { "\"$_\""} @ARGV);

0 notes on commit 0579b56

Please sign in to comment.
Something went wrong with that request. Please try again.