diff options
author | Dave Mitchell <davem@fdisolutions.com> | 2004-06-20 12:00:56 +0000 |
---|---|---|
committer | Dave Mitchell <davem@fdisolutions.com> | 2004-06-20 12:00:56 +0000 |
commit | 00da7942926f78f065bf22f95a34f99cf3d0b5bf (patch) | |
tree | 23bb735e02644f32dcaffef5701f33fc54eae2ce | |
parent | 8926f2692a3d9503b59a973004dd4d70385b09a0 (diff) | |
download | perl-00da7942926f78f065bf22f95a34f99cf3d0b5bf.tar.gz |
make mktables always update modifed time to play better with make
p4raw-id: //depot/perl@22963
-rw-r--r-- | Makefile.SH | 2 | ||||
-rw-r--r-- | lib/unicore/mktables | 5 |
2 files changed, 5 insertions, 2 deletions
diff --git a/Makefile.SH b/Makefile.SH index 762057024f..29254091f0 100644 --- a/Makefile.SH +++ b/Makefile.SH @@ -759,7 +759,7 @@ lib/lib.pm: miniperl$(EXE_EXT) lib/Config.pm $(LDLIBPTH) ./miniperl -Ilib lib/lib_pm.PL $(unidatafiles): miniperl$(EXE_EXT) lib/Config.pm lib/unicore/mktables - cd lib/unicore && $(LDLIBPTH) ../../miniperl -I../../lib mktables + cd lib/unicore && $(LDLIBPTH) ../../miniperl -I../../lib mktables -w extra.pods: miniperl$(EXE_EXT) -@test -f extra.pods && rm -f `cat extra.pods` diff --git a/lib/unicore/mktables b/lib/unicore/mktables index aa926432ac..18f0033506 100644 --- a/lib/unicore/mktables +++ b/lib/unicore/mktables @@ -27,6 +27,7 @@ my %BaseNames; ## my $Verbose = 0; my $MakeTestScript = 0; +my $AlwaysWrite = 0; while (@ARGV) { @@ -35,6 +36,8 @@ while (@ARGV) $Verbose = 1; } elsif ($arg eq '-q') { $Verbose = 0; + } elsif ($arg eq '-w') { + $AlwaysWrite = 1; # update the files even if they havent changed } elsif ($arg eq '-maketest') { $MakeTestScript = 1; } elsif ($arg eq '-C' && defined (my $dir = shift)) { @@ -88,7 +91,7 @@ sub WriteIfChanged($\@) close IN; if ($PreviousText eq $TextToWrite) { print "$file unchanged.\n" if $Verbose; - return; + return unless $AlwaysWrite; } } force_unlink ($file); |