X-Git-Url: https://git.rohieb.name/openwrt.git/blobdiff_plain/d75c4b82131d175cbd37789f8cdd7efb5cf59b30..b0d35b29018c4254d6086316be5356d6b1c824b3:/scripts/timestamp.pl diff --git a/scripts/timestamp.pl b/scripts/timestamp.pl index dc47e24aa..a3aa50cb0 100755 --- a/scripts/timestamp.pl +++ b/scripts/timestamp.pl @@ -1,4 +1,11 @@ #!/usr/bin/perl +# +# Copyright (C) 2006 OpenWrt.org +# +# This is free software, licensed under the GNU General Public License v2. +# See /LICENSE for more information. +# + use strict; sub get_ts($$) { @@ -30,11 +37,13 @@ while (@ARGV > 0) { my $path = shift @ARGV; if ($path =~ /^-x/) { my $str = shift @ARGV; - $options{"-x"} .= " -and -not -path \\*".$str."\\*" + $options{"findopts"} .= " -and -not -path \\*".$str."\\*" + } elsif ($path =~ /^-f/) { + $options{"findopts"} .= " -follow"; } elsif ($path =~ /^-/) { $options{$path} = 1; } else { - my ($tmp, $fname) = get_ts($path, $options{"-x"}); + my ($tmp, $fname) = get_ts($path, $options{"findopts"}); if ($tmp > $ts) { if ($options{'-f'}) { $n = $fname;