don't die if ISIS database is not found, just go to next one

[webpac] / back2html.pm

diff --git a/back2html.pm b/back2html.pm
index 0fcf931..ba224c7 100644 (file)
--- a/back2html.pm
+++ b/back2html.pm
@@ -33,10 +33,12 @@ sub back2html {
        # put <a href=xxx>yyyy</a> back into html
        sub mkurl_param($$$$) {
                my ($a_href,$url,$text,$a_end) = @_;
-               if ($url =~ m#\?#) {
-                       $url .= "&".$url_params;
-               } else {
-                       $url .= "?".$url_params;
+               if ($url_params) {
+                       if ($url =~ m#\?#) {
+                               $url .= "&".$url_params;
+                       } else {
+                               $url .= "?".$url_params;
+                       }
                }
                return '<'.$a_href.'"'.$url.'">'.$text.'<'.$a_end.'>';
        }