... | ... |
@@ -1,6 +1,6 @@ |
1 | 1 |
package DBIx::Custom; |
2 | 2 |
|
3 |
-our $VERSION = '0.1683'; |
|
3 |
+our $VERSION = '0.1684'; |
|
4 | 4 |
|
5 | 5 |
use 5.008001; |
6 | 6 |
use strict; |
... | ... |
@@ -2637,7 +2637,7 @@ or array refrence. |
2637 | 2637 |
# String(with where_param option) |
2638 | 2638 |
$dbi->update( |
2639 | 2639 |
param => {title => 'Perl'}, |
2640 |
- where => '{= id}', |
|
2640 |
+ where => 'id = :id'', |
|
2641 | 2641 |
where_param => {id => 2} |
2642 | 2642 |
); |
2643 | 2643 |
|
... | ... |
@@ -1,6 +1,7 @@ |
1 | 1 |
use Test::More 'no_plan'; |
2 | 2 |
use strict; |
3 | 3 |
use warnings; |
4 |
+$SIG{__WARN__} = sub { warn $_[0] unless $_[0] =~ /DEPRECATED/}; |
|
4 | 5 |
|
5 | 6 |
use DBIx::Custom; |
6 | 7 |
use DBIx::Custom::QueryBuilder; |