From: tla <tla@mit.edu>
Date: Mon, 9 Feb 2015 11:26:21 +0000 (+0100)
Subject: suppress declaration warning
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=scpubgit%2Fstemmaweb.git;a=commitdiff_plain;h=32d07a9852f3d340351f6bf8dcb3202a8b543be6;hp=4651646c23d9eb64f3b0ab31c6709dbb488a7a23

suppress declaration warning
---

diff --git a/script/maketestdb.pl b/script/maketestdb.pl
index 3a24907..db7efbc 100755
--- a/script/maketestdb.pl
+++ b/script/maketestdb.pl
@@ -51,9 +51,9 @@ my $t1 = Text::Tradition->new( input => 'Self', file => 't/data/besoin.xml' );
 die "Failed to create test tradition #1" unless $t1;
 $t1->add_stemma( dotfile => 't/data/besoin_stemweb.dot' );
 $user->add_tradition( $t1 );
-my $t2 = Text::Tradition->new( input => 'Self', file => 't/data/besoin.xml' );
-$t2->add_stemma( dotfile => 't/data/besoin_stemweb.dot' );
-$openid_user->add_tradition($t2);
+my $t1b = Text::Tradition->new( input => 'Self', file => 't/data/besoin.xml' );
+$t1b->add_stemma( dotfile => 't/data/besoin_stemweb.dot' );
+$openid_user->add_tradition($t1b);
 $dir->store( $user );
 $dir->store( $openid_user );
 say "Created test user tradition";