make urlabs a noop if base url is not provided

[www/ikiwiki.git] / IkiWiki.pm

diff --git a/IkiWiki.pm b/IkiWiki.pm
index ef8ccb2da51e4b763418344237280cf563011fba..35e64d81568f6c98aedf18af682c77836310fc8b 100644 (file)
--- a/IkiWiki.pm
+++ b/IkiWiki.pm
@@ -1072,6 +1072,8 @@ sub urlabs ($$) {
        my $url=shift;
        my $urlbase=shift;
 
+       return $url unless defined $urlbase && length $urlbase;
+
        eval q{use URI};
        URI->new_abs($url, $urlbase)->as_string;
 }