X-Git-Url: http://source.jalview.org/gitweb/?a=blobdiff_plain;ds=sidebyside;f=utils%2FpatchGt.pl;h=af5abaa25172ddfa2a2f3a50a2743140cfc432bf;hb=9e992f972641402d4f877ce479caecda1697a844;hp=07811b0b32ee903b8491ce52c8a6130a7349e7e3;hpb=ff6fa95e2c5f7a9a0eb19422f292d31341d830f7;p=jalview.git
diff --git a/utils/patchGt.pl b/utils/patchGt.pl
index 07811b0..af5abaa 100644
--- a/utils/patchGt.pl
+++ b/utils/patchGt.pl
@@ -1,3 +1,20 @@
+#*******************************************************************************
+# Jalview - A Sequence Alignment Editor and Viewer (Version 2.7)
+# Copyright (C) 2011 J Procter, AM Waterhouse, G Barton, M Clamp, S Searle
+#
+# 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 .
+#*******************************************************************************
#!/bin/perl
use strict;
@@ -5,6 +22,7 @@ use Env qw($GTID);
defined($GTID) or $GTID="UA-9060947-1";
my $SCRIPT = <
-
FOO
while (scalar @ARGV)
@@ -28,8 +45,10 @@ while (scalar @ARGV)
if (open OF,">$f.".$GTID) {
if (open IF,"$f") {
while (