[Bps-public-commit] net-lighthouse branch, master, updated. 1fe8fec270145b56699808e1d8997d782d98c111

[sunnavy at bestpractical.com]

The branch, master has been updated
       via  1fe8fec270145b56699808e1d8997d782d98c111 (commit)
      from  f494f5b7235d15d2e6a1b82e62549ee40efd521f (commit)

Summary of changes:
 lib/Net/Lighthouse/Project/Ticket.pm |   30 ++++++++++++++++++++----------
 1 files changed, 20 insertions(+), 10 deletions(-)

- Log -----------------------------------------------------------------
commit 1fe8fec270145b56699808e1d8997d782d98c111
Author: sunnavy <sunnavy at bestpractical.com>
Date:   Mon Aug 31 13:39:00 2009 +0800

    update attrs for ticket

diff --git a/lib/Net/Lighthouse/Project/Ticket.pm b/lib/Net/Lighthouse/Project/Ticket.pm
index 47d9b52..ec39d12 100644
--- a/lib/Net/Lighthouse/Project/Ticket.pm
+++ b/lib/Net/Lighthouse/Project/Ticket.pm
@@ -5,17 +5,27 @@ use Params::Validate ':all';
 use Net::Lighthouse::Util;
 extends 'Net::Lighthouse';
 # read only attr
+has [qw/created_at updated_at milestone_due_on/] => (
+    isa => 'Maybe[DateTime]',
+    is  => 'ro',
+);
+
+has [qw/number priority user_id project_id creator_id attachments_count/] => (
+    isa => 'Maybe[Int]',
+    is  => 'ro',
+);
+
+has [qw/closed /] => (
+    isa => 'Bool',
+    is  => 'ro',
+);
+
 has [
-    'priority',          'raw_data',
-    'number',            'milestone_due_on',
-    'created_at',        'user_name',
-    'state',             'permalink',
-    'versions',          'url',
-    'updated_at',        'closed',
-           'latest_body',
-    'user_id',           'project_id',
-    'attachments_count', 'creator_id',
-    'creator_name',      'assigned_user_name',
+    'raw_data',    'user_name',
+    'state',       'permalink',
+    'versions',    'url',
+    'latest_body', 'creator_name',
+    'assigned_user_name',
   ] => (
     isa => 'Maybe[Str]',
     is  => 'ro',

-----------------------------------------------------------------------