X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=blobdiff_plain;f=lib%2FZOOM%2FIRSpy%2FUtils.pm;h=475e9deeda19ed7aa5ac076a61cd6cdcaf27dbeb;hp=089e8e7f5de7a7c510da185d9af811ba0f31cd14;hb=18fb57abfe6c3aa71788d4b2d4296b9f8a1843c0;hpb=79f588c300c5605a7687fd331ebce4297aad4155 diff --git a/lib/ZOOM/IRSpy/Utils.pm b/lib/ZOOM/IRSpy/Utils.pm index 089e8e7..475e9de 100644 --- a/lib/ZOOM/IRSpy/Utils.pm +++ b/lib/ZOOM/IRSpy/Utils.pm @@ -286,6 +286,7 @@ sub _irspy_identifier2target { if !defined $id; my($prefix, $protocol, $target) = ($id =~ /([^:]*,)?(.*?):(.*)/); + $prefix ||= ""; if (uc($protocol) eq "Z39.50" || uc($protocol) eq "TCP") { return "${prefix}tcp:$target"; } elsif (uc($protocol) eq "SRU") {