[dbsrgits/DBIx-Class.git] / t / testlib / OtherFilm.pm

package OtherFilm;

use strict;
use base 'Film';

__PACKAGE__->set_table('Different_Film');

sub create_sql {
	return qq{
		title                   VARCHAR(255),
		director                VARCHAR(80),
		codirector              VARCHAR(80),
		rating                  CHAR(5),
		numexplodingsheep       INTEGER,
		hasvomit                CHAR(1)
	};
}

1;
Commit	Line	Data
ea2e61bf	1	package OtherFilm;
	2
	3	use strict;
	4	use base 'Film';
	5
	6	__PACKAGE__->set_table('Different_Film');
	7
	8	sub create_sql {
	9	return qq{
	10	title VARCHAR(255),
	11	director VARCHAR(80),
	12	codirector VARCHAR(80),
	13	rating CHAR(5),
	14	numexplodingsheep INTEGER,
	15	hasvomit CHAR(1)
	16	};
	17	}
	18
	19	1;
	20