File: TestVersionIgnored.pm

package info (click to toggle)
libdbix-class-optimisticlocking-perl 0.02-1
  • links: PTS
  • area: main
  • in suites: stretch
  • size: 216 kB
  • ctags: 17
  • sloc: perl: 270; sql: 51; makefile: 2
file content (14 lines) | stat: -rw-r--r-- 418 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
package OLTest::Schema::TestVersionIgnored;

use strict;
use warnings;
use base qw/DBIx::Class/;
__PACKAGE__->load_components(qw/ OptimisticLocking PK::Auto Core /);
__PACKAGE__->table('test_version_ignored');
__PACKAGE__->add_columns( qw/ id col1 col2 version / );

__PACKAGE__->set_primary_key('id');
__PACKAGE__->optimistic_locking_strategy('version');
__PACKAGE__->optimistic_locking_ignore_columns(['col2']);

1;