Bug 1229994: MoreBugUrl: Savane: support more sub-urls than just bugs. r=gerv.

diff --git a/extensions/MoreBugUrl/lib/Savane.pm b/extensions/MoreBugUrl/lib/Savane.pm
index efda1fa4f54e44b2e8eb441fe447acc5a57f2413..5b35bbf7dc2ed1ac0b680dea1387f755de051d09 100644 (file)
--- a/extensions/MoreBugUrl/lib/Savane.pm
+++ b/extensions/MoreBugUrl/lib/Savane.pm
@@ -19,7 +19,12 @@ use parent qw(Bugzilla::BugUrl);
 
 sub should_handle {
     my ($class, $uri) = @_;
-    return ($uri->as_string =~ m|/bugs/(index\.php)?\?\d+$|) ? 1 : 0;
+    # Savane URLs look like the following (the index.php is optional):
+    #   https://savannah.gnu.org/bugs/index.php?107657
+    #   https://savannah.gnu.org/patch/index.php?107657
+    #   https://savannah.gnu.org/support/index.php?107657
+    #   https://savannah.gnu.org/task/index.php?107657
+    return ($uri->as_string =~ m|/(bugs\|patch\|support\|task)/(index\.php)?\?\d+$|) ? 1 : 0;
 }
 
 sub _check_value {
@@ -27,10 +32,6 @@ sub _check_value {
 
     my $uri = $class->SUPER::_check_value(@_);
 
-    # Savane URLs have only two forms:
-    #   http://gna.org/bugs/index.php?12345
-    #   http://gna.org/bugs/?12345
-
     # And remove any # part if there is one.
     $uri->fragment(undef);