Skip to content
Snippets Groups Projects
Commit f9d0fb8a authored by Ralph Hempel's avatar Ralph Hempel
Browse files

ensure that the timestamp script will follow the path even if it is link ( in...

ensure that the timestamp script will follow the path even if it is link ( in our case the build directory might be a link to a ClearCase dynamic view )

SVN-Revision: 14728
parent 89181213
No related branches found
No related tags found
No related merge requests found
...@@ -13,14 +13,15 @@ sub get_ts($$) { ...@@ -13,14 +13,15 @@ sub get_ts($$) {
my $options = shift; my $options = shift;
my $ts = 0; my $ts = 0;
my $fn = ""; my $fn = "";
$path .= "/" if( -d $path);
open FIND, "find $path -type f -and -not -path \\*.svn\\* -and -not -path \\*CVS\\* $options 2>/dev/null |"; open FIND, "find $path -type f -and -not -path \\*.svn\\* -and -not -path \\*CVS\\* $options 2>/dev/null |";
while (<FIND>) { while (<FIND>) {
chomp; chomp;
my $file = $_; my $file = $_;
next if -l $file; next if -l $file;
my @stat = stat $file; my $mt = (stat $file)[9];
if ($stat[9] > $ts) { if ($mt > $ts) {
$ts = $stat[9]; $ts = $mt;
$fn = $file; $fn = $file;
} }
} }
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment