Merge 'trunk' into 'DBIx-Class-current'
[dbsrgits/DBIx-Class.git] / lib / DBIx / Class / Storage.pm
CommitLineData
75d07914 1package # hide from PAUSE
c0e7b4e5 2 DBIx::Class::Storage;
a62cf8d4 3
4use strict;
5use warnings;
6
7sub new { die "Virtual method!" }
82cc0386 8sub set_schema { die "Virtual method!" }
a62cf8d4 9sub debug { die "Virtual method!" }
10sub debugcb { die "Virtual method!" }
11sub debugfh { die "Virtual method!" }
96761eee 12sub debugobj { die "Virtual method!" }
13sub cursor { die "Virtual method!" }
a62cf8d4 14sub disconnect { die "Virtual method!" }
15sub connected { die "Virtual method!" }
16sub ensure_connected { die "Virtual method!" }
96761eee 17sub on_connect_do { die "Virtual method!" }
18sub connect_info { die "Virtual method!" }
a62cf8d4 19sub sql_maker { die "Virtual method!" }
20sub txn_begin { die "Virtual method!" }
21sub txn_commit { die "Virtual method!" }
22sub txn_rollback { die "Virtual method!" }
23sub insert { die "Virtual method!" }
24sub update { die "Virtual method!" }
25sub delete { die "Virtual method!" }
26sub select { die "Virtual method!" }
27sub select_single { die "Virtual method!" }
28sub columns_info_for { die "Virtual method!" }
29
30
a62cf8d4 31package DBIx::Class::Storage::NESTED_ROLLBACK_EXCEPTION;
32
33use overload '"' => sub {
34 'DBIx::Class::Storage::NESTED_ROLLBACK_EXCEPTION'
35};
36
37sub new {
38 my $class = shift;
04786a4c 39 my $self = {};
40 return bless $self, $class;
a62cf8d4 41}
42
431;