make Stemweb listener for result notification (#27) Relies on tla/stemmatology@79c81b...
[scpubgit/stemmaweb.git] / script / maketestdb.pl
index 387eeba..389b8ec 100755 (executable)
@@ -39,6 +39,7 @@ say "Created users";
 
 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 );
 $dir->store( $user );
 say "Created test user tradition";