Replace the old EBI server for quering protein IDs

[jpred.git] / websoft / bin / concise2html

diff --git a/websoft/bin/concise2html b/websoft/bin/concise2html
index 105501b..bd123dd 100755 (executable)
--- a/websoft/bin/concise2html
+++ b/websoft/bin/concise2html
@@ -282,9 +282,9 @@ foreach (0..$#align) {
              ## differentiate between Uniprot and Uniparc (UniRef90_UNI\w+) IDs as they require
              ## different SRS query strings
              if ($align[$_] =~ /UniRef90_(UPI\w+)/) {
-                print HTML "<a href=$SRSSERVER/wgetz?-e+[uniparc-AccNumber:$1]>$align[$_]</a>";
+                print HTML "<a href=$SRSSERVER?db=allebi&query=$1>$align[$_]</a>";
              } else {
-                print HTML "<a href=$SRSSERVER/wgetz?-e+[UNIREF90-acc:$align[$_]]>$align[$_]</a>";
+                print HTML "<a href=$SRSSERVER?db=allebi&query=$align[$_]>$align[$_]</a>";
              }
           } else {
              print HTML "$align[$_]";
@@ -306,9 +306,9 @@ foreach (0..$#align) {
               ## differentiate between Uniprot and Uniparc IDs as they require
               ## different SRS query strings
               if ($align[$_] =~ /UniRef90_(UPI\w+)/) {
-                 print HTML " : <a href=$SRSSERVER/wgetz?-e+[uniparc-AccNumber:$1]>$align[$_]</a>\n";
+                 print HTML " : <a href=$SRSSERVER?db=allebi&query=$1>$align[$_]</a>\n";
               } else {
-                 print HTML " : <a href=$SRSSERVER/wgetz?-e+[UNIREF90-acc:$align[$_]]>$align[$_]</a>\n";
+                 print HTML " : <a href=$SRSSERVER?db=allebi&query=$align[$_]>$align[$_]</a>\n";
               }
           } else {
              print HTML " : $align[$_]\n";