mirror of
git://projects.qi-hardware.com/openwrt-xburst.git
synced 2025-02-20 02:04:42 +02:00
add -f option to timestamp.pl (follow symlinks)
git-svn-id: svn://svn.openwrt.org/openwrt/branches/buildroot-ng/openwrt@4457 3c298f89-4303-0410-b956-a3cf2f4a3e73
This commit is contained in:
parent
150b0c9cab
commit
503788e306
@ -37,11 +37,13 @@ while (@ARGV > 0) {
|
|||||||
my $path = shift @ARGV;
|
my $path = shift @ARGV;
|
||||||
if ($path =~ /^-x/) {
|
if ($path =~ /^-x/) {
|
||||||
my $str = shift @ARGV;
|
my $str = shift @ARGV;
|
||||||
$options{"-x"} .= " -and -not -path \\*".$str."\\*"
|
$options{"findopts"} .= " -and -not -path \\*".$str."\\*"
|
||||||
|
} elsif ($path =~ /^-f/) {
|
||||||
|
$options{"findopts"} .= " -follow";
|
||||||
} elsif ($path =~ /^-/) {
|
} elsif ($path =~ /^-/) {
|
||||||
$options{$path} = 1;
|
$options{$path} = 1;
|
||||||
} else {
|
} else {
|
||||||
my ($tmp, $fname) = get_ts($path, $options{"-x"});
|
my ($tmp, $fname) = get_ts($path, $options{"findopts"});
|
||||||
if ($tmp > $ts) {
|
if ($tmp > $ts) {
|
||||||
if ($options{'-f'}) {
|
if ($options{'-f'}) {
|
||||||
$n = $fname;
|
$n = $fname;
|
||||||
|
Loading…
x
Reference in New Issue
Block a user