Changeset 5796

Show
Ignore:
Timestamp:
01/29/08 18:23:49 (5 years ago)
Author:
daisuke
Message:

lang/perl/DBIx-Replicate; oops, wrong condition.

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • lang/perl/DBIx-Replicate/branch/object-refactor/lib/DBIx/Replicate.pm

    r5795 r5796  
    7474    }); 
    7575 
    76     if (! $args->{strategy} && $args->{strategy_class}) { 
     76    if (! $args->{strategy} && ! $args->{strategy_class}) { 
    7777        if ($args->{copy_by}) { 
    78             $args->{strategy_class} ||= 'DBIx::Replicate::Strategy::Generic'; 
     78            $args->{strategy_class} ||= 'DBIx::Replicate::Strategy::CopyBy'; 
    7979        } else { 
    8080            $args->{strategy_class} ||= 'DBIx::Replicate::Strategy::PK';