Changeset 1771
- Timestamp:
- 04/04/08 06:48:16 (23 months ago)
- Location:
- branches/release-33/lib/MT
- Files:
-
- 2 modified
-
Object.pm (modified) (2 diffs)
-
ObjectDriverFactory.pm (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
branches/release-33/lib/MT/Object.pm
r1757 r1771 220 220 $class->add_trigger( pre_save => get_date_translator(\&ts2db, 1) ); 221 221 $class->add_trigger( post_load => get_date_translator(\&db2ts, 0) ); 222 } 223 224 if ( exists($props->{cacheable}) && !$props->{cacheable} ) { 225 no warnings 'redefine'; 226 no strict 'refs'; ## no critic 227 *{$class . '::driver'} = sub { $_[0]->dbi_driver(@_) }; 222 228 } 223 229 … … 727 733 } 728 734 735 # ref to the fallback driver for non-cacheable classes 736 our $DBI_DRIVER; 737 sub dbi_driver { 738 unless ($DBI_DRIVER) { 739 my $driver = driver(@_); 740 if ( my $fb_driver = $driver->fallback ) { 741 $driver = $fb_driver; 742 } 743 $DBI_DRIVER = $driver; 744 } 745 return $DBI_DRIVER; 746 } 747 729 748 sub table_name { 730 749 my $obj = shift; -
branches/release-33/lib/MT/ObjectDriverFactory.pm
r1456 r1771 94 94 } 95 95 $MT::Object::DRIVER = undef; 96 $MT::Object::DBI_DRIVER = undef; 96 97 } 97 98 }
