| ... | ... |
@@ -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; |