lib/DBIx/Class/Storage.pm

   1 package DBIx::Class::Storage;
   2
   3 use strict;
   4 use warnings;
   5
   6 sub new { die "Virtual method!" }
   7 sub debug { die "Virtual method!" }
   8 sub debugcb { die "Virtual method!" }
   9 sub debugfh { die "Virtual method!" }
  10 sub disconnect { die "Virtual method!" }
  11 sub connected { die "Virtual method!" }
  12 sub ensure_connected { die "Virtual method!" }
  13 sub sql_maker { die "Virtual method!" }
  14 sub txn_begin { die "Virtual method!" }
  15 sub txn_commit { die "Virtual method!" }
  16 sub txn_rollback { die "Virtual method!" }
  17 sub insert { die "Virtual method!" }
  18 sub update { die "Virtual method!" }
  19 sub delete { die "Virtual method!" }
  20 sub select { die "Virtual method!" }
  21 sub select_single { die "Virtual method!" }
  22 sub columns_info_for { die "Virtual method!" }
  23
  24
  25
  26
  27 package DBIx::Class::Storage::NESTED_ROLLBACK_EXCEPTION;
  28
  29 use overload '"' => sub {
  30   'DBIx::Class::Storage::NESTED_ROLLBACK_EXCEPTION'
  31 };
  32
  33 sub new {
  34   my $class = shift;
  35
  36   return bless {}, $class;
  37 }
  38
  39 1;