use char instead of varchar

This commit is contained in:
Graham Knop 2009-02-18 03:18:20 +00:00
parent c90fa56507
commit e5ede77c29
17 changed files with 31 additions and 31 deletions

View file

@ -64,7 +64,7 @@ sub install {
my $sql
= q{CREATE TABLE `}
. $installDef->{tableName} . q{` ( }
. q{`assetId` VARCHAR(22) BINARY NOT NULL, }
. q{`assetId` CHAR(22) BINARY NOT NULL, }
. q{`revisionDate` BIGINT NOT NULL, };
for my $column ( keys %{ $installDef->{properties} } ) {
my $control = WebGUI::Form::DynamicField->new( $session, %{ $installDef->{properties}->{$column} } );