diff Lib/IMPL/SQL/Types.pm @ 44:32d2350fccf9

ORM *Minor fixes *Working tarnsform to sql *Fixes to the sql traits
author Sergey
date Mon, 11 Jan 2010 01:42:00 +0300
parents d660fb38b7cc
children 16ada169ca75
line wrap: on
line diff
--- a/Lib/IMPL/SQL/Types.pm	Thu Jan 07 15:41:49 2010 +0300
+++ b/Lib/IMPL/SQL/Types.pm	Mon Jan 11 01:42:00 2010 +0300
@@ -13,7 +13,7 @@
 }
 
 sub Varchar($) {
-    return IMPL::SQL::Schema::Type->new(Name => 'VARCHAR', Length => shift);
+    return IMPL::SQL::Schema::Type->new(Name => 'VARCHAR', MaxLength => shift);
 }
 
 sub Float($) {