Changeset 1846

Show
Ignore:
Timestamp:
04/10/08 23:10:48 (8 months ago)
Author:
bchoate
Message:

Handle dbi driver selection with multiple levels of caching drivers.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • branches/release-34/lib/MT/Object.pm

    r1771 r1846  
    738738    unless ($DBI_DRIVER) { 
    739739        my $driver = driver(@_); 
    740         if ( my $fb_driver = $driver->fallback ) { 
    741             $driver = $fb_driver; 
     740        while ( $driver->can('fallback') ) { 
     741            if ($driver->fallback) { 
     742                $driver = $driver->fallback; 
     743            } else { 
     744                last; 
     745            } 
    742746        } 
    743747        $DBI_DRIVER = $driver;