[Bps-public-commit] r19717 - Net-Google-Code/trunk/lib/Net/Google/Code/Issue
sunnavy at bestpractical.com
sunnavy at bestpractical.com
Tue May 19 02:43:19 EDT 2009
Author: sunnavy
Date: Tue May 19 02:43:19 2009
New Revision: 19717
Modified:
Net-Google-Code/trunk/lib/Net/Google/Code/Issue/Search.pm
Log:
coerce _can
Modified: Net-Google-Code/trunk/lib/Net/Google/Code/Issue/Search.pm
==============================================================================
--- Net-Google-Code/trunk/lib/Net/Google/Code/Issue/Search.pm (original)
+++ Net-Google-Code/trunk/lib/Net/Google/Code/Issue/Search.pm Tue May 19 02:43:19 2009
@@ -27,14 +27,15 @@
coerce 'Can' => from 'CanStr' => via { $CAN{$_} };
has '_can' => (
- is => 'rw',
- isa => 'Can',
+ is => 'rw',
+ isa => 'Can',
+ coerce => 1,
default => 2,
);
-has '_q' => (
- isa => 'Str',
- is => 'rw',
+has '_q' => (
+ isa => 'Str',
+ is => 'rw',
default => '',
);
More information about the Bps-public-commit
mailing list