Show
Ignore:
Timestamp:
06/04/08 01:21:49 (18 months ago)
Author:
fumiakiy
Message:

Modernized how sort argument is specified in group_by query. BugId:79977. The legacy way of specifying it is still allowed but discouraged.

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • branches/release-39/lib/MT/ObjectDriver/Driver/DBI.pm

    r2475 r2500  
    137137    my $order = delete $args->{sort}; 
    138138    my $direction = delete $args->{direction}; 
     139    if ( $order =~ /\sdesc|asc/i ) { 
     140        my @new_order; 
     141        while ($order =~ /(?:\s*([\w\s\(\)]+?)\s(desc|asc))/ig) { 
     142            push @new_order, { column => $1, desc => $2 }; 
     143        } 
     144        $order = \@new_order if @new_order; 
     145    } 
    139146    my $limit = exists $args->{limit} ? delete $args->{limit} : undef; 
    140147    my $offset = exists $args->{offset} ? delete $args->{offset} : undef;