From 821c2415905922bc11b51270178e8a31cfd1ab36 Mon Sep 17 00:00:00 2001
From: tjc <tjc@ee4ac58c-ac51-4696-9907-e4b3aa274f04>
Date: Mon, 31 Jan 2005 10:31:48 +0000
Subject: [PATCH] fix to enable save from SRS plus use uniprot
git-svn-id: svn+ssh://svn.internal.sanger.ac.uk/repos/svn/pathsoft/artemis/trunk@2289 ee4ac58c-ac51-4696-9907-e4b3aa274f04
---
etc/results_to_netscape | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/etc/results_to_netscape b/etc/results_to_netscape
index 4cd31a8ed..4ca2d5dc0 100755
--- a/etc/results_to_netscape
+++ b/etc/results_to_netscape
@@ -91,7 +91,7 @@ perl -e '
BEGIN {
# change these variable to list the databases to search for the IDs - the
# database names should be separated by spaces
- $PROTEIN_DATABASES = "swall";
+ $PROTEIN_DATABASES = "uniprot";
$DNA_DATABASES = "embl";
# change this to point to the wgetz script of your SRS server
@@ -140,7 +140,7 @@ sub hyperlink_id
}
}
- $r = qq#<a href="http://$SRS_SERVER\[\{$PROTEIN_DATABASES\}-ID:$id*]|[\{$PROTEIN_DATABASES\}-AccNumber:$id*]">$id</a>#;
+ $r = qq#<a href="http://$SRS_SERVER-id+1+\[\{$PROTEIN_DATABASES\}-ID:$id*]|[\{$PROTEIN_DATABASES\}-AccNumber:$id*]">$id</a>#;
}
return $r
}
--
GitLab