From: Will Hawes Date: Fri, 20 Jan 2006 10:56:24 +0000 (+0000) Subject: removed erroneous commit for ResultSet X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=6ae63e1c2c4b4ab4fa56170a3c8a5a81bb1efe32;p=dbsrgits%2FDBIx-Class-Historic.git removed erroneous commit for ResultSet --- diff --git a/lib/DBIx/Class/ResultSet.pm b/lib/DBIx/Class/ResultSet.pm index 38efc79..ff7d8e9 100644 --- a/lib/DBIx/Class/ResultSet.pm +++ b/lib/DBIx/Class/ResultSet.pm @@ -40,20 +40,6 @@ sub new { #use Data::Dumper; warn Dumper($attrs); $attrs = Storable::dclone($attrs || {}); # { %{ $attrs || {} } }; my %seen; - - # wrong! we cannot delete select/as because it will interfere with the count() method. need to just set alias correctly in the first instance -=pod - if( $attrs->{from} && $attrs->{alias} eq 'me' ) { - my @keys = keys( %{$attrs->{from}->[0]} ); - $attrs->{alias} = $keys[0]; - delete $attrs->{select}; - delete $attrs->{as}; - #die Dumper $attrs; - } -=cut -# alias should be set in accordance with from if alias is not defined or = "me" -# could also alter the line below instead, i.e. use alias if defined, then get from "from", then class->table, then "me" as a last resort. - my $alias = ($attrs->{alias} ||= 'me'); if (!$attrs->{select}) { my @cols = ($attrs->{cols}