Count RC bugs in stable.

[bugscan.git] / scanlib.pm

diff --git a/scanlib.pm b/scanlib.pm
index 398687ba0e4011762e49dfdec80fc0fb2d4a2c49..ed9fd37dd022f2ccfeb856dbc1f142b0ce60c7e0 100644 (file)
--- a/scanlib.pm
+++ b/scanlib.pm
@@ -319,4 +319,13 @@ sub check_worry {
        return 1;
 }
 
        return 1;
 }
 

+sub check_worry_stable {
+       my ($status) = @_;
+
+       if ($status !~ m/ \[[^]]*S/) {
+               return 0;
+       }
+       return 1;
+}
+

 1;
 1;