Warning fix

[catagits/Gitalist.git] / lib / Gitalist.pm

diff --git a/lib/Gitalist.pm b/lib/Gitalist.pm
index be94265..9d942e1 100644 (file)
--- a/lib/Gitalist.pm
+++ b/lib/Gitalist.pm
@@ -41,7 +41,7 @@ around uri_for => sub {
        delete $params->{p} unless defined $params->{p} && length $params->{p};
   }
   my $uri = $c->$orig(@_, $params);
-  $$uri =~ tr[&][;];
+  $$uri =~ tr[&][;] if defined $uri;
   return $uri;
 };