freebsd-ports/databases/p5-SQL-Translator/files/5.005_03-patch-lib::SQL::Translator::Parser::xSV.pm
Mathieu Arnold d806b7b030 Now works with stock perl 5.005_03
PR:		66431
Submitted by:	Lars Thegler <lars@thegler.dk> (maintainer)
2004-05-10 13:21:29 +00:00

15 lines
500 B
Perl

--- lib/SQL/Translator/Parser/xSV.pm.orig Sun May 9 21:39:20 2004
+++ lib/SQL/Translator/Parser/xSV.pm Sun May 9 21:39:50 2004
@@ -174,9 +174,9 @@
$size = [ $size->[0] + $size->[1] ];
}
- my $field = $table->get_field( $field );
- $field->size( $size );
- $field->data_type( $data_type );
+ my $f = $table->get_field( $field );
+ $f->size( $size );
+ $f->data_type( $data_type );
}
}