Whoopsie vol. 420
This commit is contained in:
parent
f72891b64d
commit
917097b26a
|
@ -5,6 +5,8 @@ my $starts-with-protocol = rx:i/ ^https? '://'/;
|
||||||
|
|
||||||
sub fix-protocol($url) is export {
|
sub fix-protocol($url) is export {
|
||||||
return "http://" ~ $url unless $url ~~ $starts-with-protocol;
|
return "http://" ~ $url unless $url ~~ $starts-with-protocol;
|
||||||
|
|
||||||
|
return $url;
|
||||||
}
|
}
|
||||||
|
|
||||||
# I use a dedicated method to remove all debugging messages prior to commit
|
# I use a dedicated method to remove all debugging messages prior to commit
|
||||||
|
|
Loading…
Reference in a new issue