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

[sunnavy at bestpractical.com]

The branch, master has been updated
       via  de7db0c1c88ac98a727f91b6cb5b08de45c52f8c (commit)
      from  a64af316d58834011f6cbd0770c3daf15b744129 (commit)

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

- Log -----------------------------------------------------------------
commit de7db0c1c88ac98a727f91b6cb5b08de45c52f8c
Author: sunnavy <sunnavy at bestpractical.com>
Date:   Mon Aug 31 13:59:20 2009 +0800

    update tikeet version part

diff --git a/lib/Net/Lighthouse/Project/Ticket/Version.pm b/lib/Net/Lighthouse/Project/Ticket/Version.pm
index dbcd8bb..ba82590 100644
--- a/lib/Net/Lighthouse/Project/Ticket/Version.pm
+++ b/lib/Net/Lighthouse/Project/Ticket/Version.pm
@@ -5,18 +5,36 @@ use Params::Validate ':all';
 use Net::Lighthouse::Util;
 
 # read only attr
+has [qw/created_at updated_at/] => (
+    isa => 'Maybe[DateTime]',
+    is  => 'ro',
+);
+
+has [
+    qw/milestone_id assigned_user_id number user_id
+      project_id creator_id attachments_count/
+  ] => (
+    isa => 'Maybe[Int]',
+    is  => 'ro',
+  );
+
+has [qw/closed/] => (
+    isa => 'Bool',
+    is  => 'ro',
+);
+
+has [qw/diffable_attributes/] => (
+    isa => 'HashRef',
+    is  => 'ro',
+);
+
 has [
-    'assigned_user_name', 'assigned_user_id',
-    'attachments_count',  'body',
-    'body_html',          'closed',
-    'created_at',         'creator_id',
-    'milestone_id',       'number',
-    'permalink',          'project_id',
+    'assigned_user_name', 'body',
+    'body_html',          'permalink',
     'state',              'tag',
-    'title',              'updated_at',
-    'user_id',            'user_name',
-    'creator_name',       'url',
-    'diffable_attributes',
+    'title',              'user_id',
+    'user_name',          'creator_name',
+    'url',
   ] => (
     isa => 'Maybe[Str]',
     is  => 'ro',

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