X-Git-Url: http://git.openwrt.org/?p=openwrt%2Fopenwrt.git;a=blobdiff_plain;f=scripts%2Ftimestamp.pl;h=e24d8149d9c8754ba72e8918e09cd9c390427251;hp=b2d68a1bb15f4820655540cbf3da490d23096dc6;hb=fe33c185bd7027bb37d8cc0b16ba2cea3e834ccd;hpb=625b692c1f6ee3494d489ee8f254b77de7585f1d diff --git a/scripts/timestamp.pl b/scripts/timestamp.pl index b2d68a1bb1..e24d8149d9 100755 --- a/scripts/timestamp.pl +++ b/scripts/timestamp.pl @@ -13,14 +13,15 @@ sub get_ts($$) { my $options = shift; my $ts = 0; my $fn = ""; - open FIND, "find $path -type f -and -not -path \\*.svn\\* -and -not -path \\*CVS\\* $options 2>/dev/null |"; + $path .= "/" if( -d $path); + open FIND, "find $path -type f -and -not -path \\*/.svn\\* -and -not -path \\*CVS\\* $options 2>/dev/null |"; while () { chomp; my $file = $_; next if -l $file; - my @stat = stat $file; - if ($stat[9] > $ts) { - $ts = $stat[9]; + my $mt = (stat $file)[9]; + if ($mt > $ts) { + $ts = $mt; $fn = $file; } }