--- a/Lib/IMPL/SQL/Schema/Column.pm	Tue Apr 10 08:13:22 2012 +0400
+++ b/Lib/IMPL/SQL/Schema/Column.pm	Tue Apr 10 20:08:29 2012 +0400
@@ -20,51 +20,51 @@
     my $this = shift;
     
     $this->{$name} or
-    	die new IMPL::InvalidArgumentException('A column name is required');
+        die new IMPL::InvalidArgumentException('A column name is required');
     
     $this->{$isNullable} = 0 if not exists $this->{$isNullable};
     
     is( $this->{$type}, typeof IMPL::SQL::Schema::Type) or
-    	die new IMPL::InvalidArgumentException('a type is required for the column',$this->{$name});
+        die new IMPL::InvalidArgumentException('a type is required for the column',$this->{$name});
 }
 
 sub SameValue {
     my ($this,$other) = @_;
     
     return (
-    	$this->{$name} eq $other->{$name}
-    	and $this->{$isNullable} == $other->{$isNullable}
-    	and equals_s($this->{$defaultValue}, $other->{$defaultValue})
-    	and $this->{$type}->SameValue($other->{$type})
+        $this->{$name} eq $other->{$name}
+        and $this->{$isNullable} == $other->{$isNullable}
+        and equals_s($this->{$defaultValue}, $other->{$defaultValue})
+        and $this->{$type}->SameValue($other->{$type})
     );
 }
 
 sub SetType {
-	my ($this,$newType) = @_;
-	
-	$this->{$type} = $newType;
+    my ($this,$newType) = @_;
+    
+    $this->{$type} = $newType;
 }
 
 sub SetDefaultValue {
-	my ($this,$value) = @_;
-	
-	$this->{$defaultValue} = $value;
+    my ($this,$value) = @_;
+    
+    $this->{$defaultValue} = $value;
 }
 
 sub SetNullable {
-	my ($this, $value) = @_;
-	
-	$this->{$isNullable} = $value;
+    my ($this, $value) = @_;
+    
+    $this->{$isNullable} = $value;
 }
 
 sub SetOptions {
-	my ($this,$diff) = @_;
-	
-	return unless ref $diff eq 'HASH';
-	
-	$this->tag({}) unless $this->tag;
-	
-	hashApply($this->tag,$diff);
+    my ($this,$diff) = @_;
+    
+    return unless ref $diff eq 'HASH';
+    
+    $this->tag({}) unless $this->tag;
+    
+    hashApply($this->tag,$diff);
 }
 
 1;