X-Git-Url: http://source.jalview.org/gitweb/?a=blobdiff_plain;f=utils%2FpatchGt.pl;fp=utils%2FpatchGt.pl;h=0000000000000000000000000000000000000000;hb=4f77328104498504339216829abf5ea87e2791ec;hp=6f8162cd5d2711182bc86018f6fb2cb69acf0be2;hpb=2b8c0785318a3528e1876e8e2dd48b7d831eae69;p=jalview.git
diff --git a/utils/patchGt.pl b/utils/patchGt.pl
deleted file mode 100644
index 6f8162c..0000000
--- a/utils/patchGt.pl
+++ /dev/null
@@ -1,70 +0,0 @@
-#!/bin/perl
-##
-# Jalview - A Sequence Alignment Editor and Viewer ($$Version-Rel$$)
-# Copyright (C) $$Year-Rel$$ The Jalview Authors
-#
-# This file is part of Jalview.
-#
-# Jalview is free software: you can redistribute it and/or
-# modify it under the terms of the GNU General Public License
-# as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version.
-#
-# Jalview is distributed in the hope that it will be useful, but
-# WITHOUT ANY WARRANTY; without even the implied warranty
-# of MERCHANTABILITY or FITNESS FOR A PARTICULAR
-# PURPOSE. See the GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License along with Jalview. If not, see .
-# The Jalview Authors are detailed in the 'AUTHORS' file.
-##
-
-use strict;
-use Env qw($GTID);
-
-defined($GTID) or $GTID="UA-9060947-1";
-my $SCRIPT = <
-
-
-FOO
-
-while (scalar @ARGV)
-{
- my $f=shift @ARGV;
- if (-f $f) {
- if (system("grep","-v","-q",'"'.$GTID.'"',$f)) {
- if (open OF,">$f.".$GTID) {
- if (open IF,"$f") {
- while () {
- if ($_=~m!!) {
- $_=~s!!$SCRIPT!;
- } else {
-# $_=~s!href="([~"]+)"!href="$1" onclick="
- }
- print OF $_;
- }
- close(IF);
- close(OF);
- rename($f,$f.".old.".$GTID) or die("Couldn't rename $f to $f".".old.".$GTID,$@);
- rename($f.".$GTID",$f) or die("Couldn't rename $f.".$GTID." to $f",$@);
- unlink($f.".old.".$GTID) or die("Couldn't delete ".$f.".old.".$GTID,$@);
- } else {
- warn("Can't open $f for reading.",$@);
- }
- } else {
- warn("Couldn't open new edited file $f.$GTID",$@);
- }
- }
- }
-}
-