Mercurial > pub > Impl

comparison Lib/IMPL/SQL/Schema/Column.pm @ 282:68d905f8dc43

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*IMPL::SQL fixed warnings
author cin
date Tue, 12 Feb 2013 01:24:36 +0400
parents 4ddb27ff4a0b
children 77df11605d3a
comparison
equal deleted inserted replaced
281:a8dbddf491dd 282:68d905f8dc43
22 my $this = shift; 22 my $this = shift;
23 23
24 $this->{$name} or 24 $this->{$name} or
25 die new IMPL::InvalidArgumentException('A column name is required'); 25 die new IMPL::InvalidArgumentException('A column name is required');
26 26
27 $this->{$isNullable} = 0 if not exists $this->{$isNullable}; 27 $this->{$isNullable} ||= 0; # if not exists $this->{$isNullable};
28 28
29 is( $this->{$type}, typeof IMPL::SQL::Schema::Type) or 29 is( $this->{$type}, typeof IMPL::SQL::Schema::Type) or
30 die new IMPL::InvalidArgumentException('a type is required for the column',$this->{$name}); 30 die new IMPL::InvalidArgumentException('a type is required for the column',$this->{$name});
31 } 31 }
32 32