[Libreoffice-commits] dev-tools.git: 2 commits - scripts/esc-bug-stats.pl

[Michael Meeks]

 scripts/esc-bug-stats.pl |   13 ++++++++++---
 1 file changed, 10 insertions(+), 3 deletions(-)

New commits:
commit 072933624f42e007b017667517cf72c765ccfc52
Author: Michael Meeks <michael.meeks at collabora.com>
Date:   Tue Sep 10 10:46:58 2013 +0100

    3.6 open MAB should have no data in future.

diff --git a/scripts/esc-bug-stats.pl b/scripts/esc-bug-stats.pl
index bbd823f..7bc1501 100755
--- a/scripts/esc-bug-stats.pl
+++ b/scripts/esc-bug-stats.pl
@@ -262,7 +262,7 @@ print << "EOF"
      </table:table-cell>
      <table:table-cell/>
      <table:table-cell table:formula="of:=[.L2]-[.B2]" office:value-type="float" calcext:value-type="float"/>
-     <table:table-cell office:value-type="float" office:value="$ver_open{'3.6'}" calcext:value-type="float"/>
+     <table:table-cell/>
      <table:table-cell table:formula="of:=[.M2]-[.D2]" office:value-type="float" calcext:value-type="float"/>
      <table:table-cell office:value-type="float" office:value="$ver_open{'4.0'}" calcext:value-type="float"/>
      <table:table-cell table:formula="of:=[.N2]-[.F2]" office:value-type="float" calcext:value-type="float"/>
commit 29ccb8460750008351b49956dbae3d579c3c8608
Author: Michael Meeks <michael.meeks at collabora.com>
Date:   Tue Sep 10 09:44:44 2013 +0100

    parse some more bugzilla edge cases.

diff --git a/scripts/esc-bug-stats.pl b/scripts/esc-bug-stats.pl
index 9375352..bbd823f 100755
--- a/scripts/esc-bug-stats.pl
+++ b/scripts/esc-bug-stats.pl
@@ -32,9 +32,13 @@ sub get_deps($)
 
     my $bug_count = -1;
     while (my $line = shift (@bugs)) {
-	if ($line =~ m/^\s*depends on\s*$/) {
+	if ($line =~ m/does not depend on any open bugs/) {
+	    $bug_count = 0;
+	    last;
+	}
+	elsif ($line =~ m/^\s*depends on\s*$/) {
 	    $line = shift @bugs;
-#	    print STDERR "Have depends on\n";
+#	    print STDERR "Have depends on '$line'\n";
 	    if ($line =~ m/^\s*(\d+)\s*$/) {
 		my $num = $1;
 		$line = shift @bugs;
@@ -43,6 +47,9 @@ sub get_deps($)
 		    $bug_count = $num;
 		    last;
 		}
+	    } elsif ($line =~ m/\s+one\s+/) { # special case for one
+		$bug_count = 1;
+		last;
 	    } else {
 		print STDERR "odd depends on follow-on: '$line'\n";
 	    }