| ... | ... |
@@ -844,6 +844,8 @@ sub select {
|
| 844 | 844 |
: []; |
| 845 | 845 |
$opt{table} = $tables;
|
| 846 | 846 |
my $where_param = $opt{where_param} || delete $opt{param} || {};
|
| 847 |
+ warn "select method where_param option is DEPRECATED!" |
|
| 848 |
+ if $opt{where_param};
|
|
| 847 | 849 |
|
| 848 | 850 |
# Add relation tables(DEPRECATED!); |
| 849 | 851 |
if ($opt{relation}) {
|