X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=dbsrgits%2FDBIx-Class.git;a=blobdiff_plain;f=t%2F88result_set_column.t;fp=t%2F88result_set_column.t;h=7abf670c70b3c874a44b2f5ca375e5ca211a4ccf;hp=f27c5dd863a8cc6736136c1d62c114f4b26047b2;hb=dc7d89911b7bb98c30208cf73af522a99998dcd6;hpb=9ab0364d36a4357b766f6dfccfb1df5ef69b079b diff --git a/t/88result_set_column.t b/t/88result_set_column.t index f27c5dd..7abf670 100644 --- a/t/88result_set_column.t +++ b/t/88result_set_column.t @@ -40,6 +40,13 @@ while (my $r = $rs_title->next) { is_deeply (\@all_titles, \@nexted_titles, 'next works'); +my @list_ctx; +warnings_exist { + @list_ctx = $rs_year->func_rs('DISTINCT'); +} [qr/\Qfunc_rs() always returns a ResultSet instance regardless of calling context/]; +is( scalar @list_ctx, 1, 'wantarray context does not affect func_rs'); +isa_ok( $list_ctx[0], 'DBIx::Class::ResultSet' ); +isa_ok( scalar( $rs_year->func_rs('DISTINCT') ), 'DBIx::Class::ResultSet' ); is_deeply( [ sort $rs_year->func('DISTINCT') ], [ 1997, 1998, 1999, 2001 ], "wantarray context okay"); ok ($max_year->next == $rs_year->max, q/get_column (\'FUNC') ok/);