--- nfo/perl/libs/Class/Tangram.pm	2002/11/17 07:20:51	1.5
+++ nfo/perl/libs/Class/Tangram.pm	2004/05/11 23:28:49	1.6
@@ -865,7 +865,7 @@
 
 =cut
 
-    } elsif ($option->{sql} =~ m/^\s*(?:tiny|long|medium)?
+    } elsif ($option->{sql} =~ m/^\s*(tiny|long|medium)?
 				 (?:blob|text)/ix) {
 	my $max_length = ($1 ? ($1 eq "tiny"?255:2**24 - 1)
 			  : 2**16 - 1);