fix various bugs

[scpubgit/stemmatology.git] / script / svg_from_csv.pl

diff --git a/script/svg_from_csv.pl b/script/svg_from_csv.pl
index 7a154c4..9b72e7a 100644 (file)
--- a/script/svg_from_csv.pl
+++ b/script/svg_from_csv.pl
@@ -11,6 +11,7 @@ use Text::Tradition;
 my $tradition = Text::Tradition->new(
     'CSV' => $ARGV[0],
     'base' => $ARGV[1],
+    'linear' => 0,
     );
 
 
@@ -38,5 +39,3 @@ foreach my $i ( 0 .. $rows-1 ) {
     print "\t</tr>\n";
 }
 print "</table></body></html>\n";
-    
-