[darwinbuild-changes] [282] trunk/darwinbuild/log-index.pl
source_changes at macosforge.org
source_changes at macosforge.org
Wed Oct 4 02:02:18 PDT 2006
Revision: 282
http://trac.macosforge.org/projects/darwinbuild/changeset/282
Author: kevin
Date: 2006-10-04 02:02:18 -0700 (Wed, 04 Oct 2006)
Log Message:
-----------
- show files from this build that haven't been built yet.
Modified Paths:
--------------
trunk/darwinbuild/log-index.pl
Modified: trunk/darwinbuild/log-index.pl
===================================================================
--- trunk/darwinbuild/log-index.pl 2005-09-29 18:56:43 UTC (rev 281)
+++ trunk/darwinbuild/log-index.pl 2006-10-04 09:02:18 UTC (rev 282)
@@ -35,7 +35,7 @@
my $build = shift;
local *PROJECTS;
- open PROJECTS, '-|', $darwinxref, '-b', $build, 'version', '*' || die;
+ open PROJECTS, '-|', $darwinxref, '-b', $build, 'version', '?' || die;
my @projects;
while (<PROJECTS>) {
my $project = $_;
@@ -166,9 +166,8 @@
my $logfile;
if ( -e "$LOGDIR/$projnam" ) {
- #$build_version = getBuildVersion bsd_glob("$LOGDIR/$projnam/$project.*");
- #my $logfile = "$LOGDIR/$projnam/$project.log~$build_version";
- $logfile = bsd_glob("$LOGDIR/$projnam/*.log~*");
+ $build_version = getBuildVersion(bsd_glob("$LOGDIR/$projnam/$project.*"));
+ $logfile = "$LOGDIR/$projnam/$project.log~$build_version";
if ( -e $logfile ) {
local *LOG;
open LOG, $logfile;
@@ -205,6 +204,14 @@
<td align="right" $color>$exitstatus</td>
</tr>
EOB
+ } else {
+ print <<EOB;
+<tr>
+ <td>$project</td>
+ <td></td>
+ <td></td>
+ <td></td>
+EOB
}
}
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.macosforge.org/pipermail/darwinbuild-changes/attachments/20061004/2b83ad50/attachment-0001.html
More information about the darwinbuild-changes
mailing list