X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=wince%2Fconfig_h.PL;h=517a430ecf987de0d759ecc07190f921209db858;hb=e2a02c1e735e4afbf3df91186f80982fdd43695e;hp=957966c59fa9d8a25cd533419685353ae741374b;hpb=18f68570297a02601dc2452e05e11ca1485ace3f;p=p5sagit%2Fp5-mst-13.2.git diff --git a/wince/config_h.PL b/wince/config_h.PL index 957966c..517a430 100644 --- a/wince/config_h.PL +++ b/wince/config_h.PL @@ -18,6 +18,7 @@ while (@ARGV && $ARGV[0] =~ /^([\w_]+)=(.*)$/) } $opt{CONFIG_H} ||= 'config.h'; +$opt{CORE_DIR} ||= '../lib/CORE'; warn "Writing $opt{CONFIG_H}\n"; @@ -52,7 +53,7 @@ eval $str; die "$str:$@" if $@; open(H,">$file.new") || die "Cannot open $file.new:$!"; -#binmode H; # no CRs (which cause a spurious rebuild) +binmode H; # no CRs (which cause a spurious rebuild) while () { last if /^$term$/o; @@ -76,9 +77,9 @@ close(H); close(SH); -chmod(0666,"../lib/CORE/config.h"); -copy("$file.new","../lib/CORE/config.h") || die "Cannot copy:$!"; -chmod(0444,"../lib/CORE/config.h"); +chmod(0666,"$opt{CORE_DIR}/$opt{CONFIG_H}"); +copy("$file.new","$opt{CORE_DIR}/$opt{CONFIG_H}") || die "Cannot copy:$!"; +chmod(0444,"$opt{CORE_DIR}/$opt{CONFIG_H}"); if (compare("$file.new",$file)) {