[Bps-public-commit] r12459 - in Prophet/branches/moose: .

[sartak at bestpractical.com]

Author: sartak
Date: Sat May 17 05:49:17 2008
New Revision: 12459

Modified:
   Prophet/branches/moose/   (props changed)
   Prophet/branches/moose/lib/Prophet/ChangeSet.pm

Log:
 r56186 at onn:  sartak | 2008-05-17 05:49:06 -0400
 Add type constraints to ChangeSet's attributes


Modified: Prophet/branches/moose/lib/Prophet/ChangeSet.pm
==============================================================================
--- Prophet/branches/moose/lib/Prophet/ChangeSet.pm	(original)
+++ Prophet/branches/moose/lib/Prophet/ChangeSet.pm	Sat May 17 05:49:17 2008
@@ -4,28 +4,34 @@
 use Prophet::Change;
 use Params::Validate;
 
-has sequence_no => (
-    is => 'rw',
+has source_uuid => (
+    is  => 'rw',
+    isa => 'Str',
 );
 
-has source_uuid => (
-    is => 'rw',
+has sequence_no => (
+    is  => 'rw',
+    isa => 'Maybe[Int]',
 );
 
 has original_source_uuid => (
-    is => 'rw',
+    is  => 'rw',
+    isa => 'Str',
 );
 
 has original_sequence_no => (
-    is => 'rw',
+    is  => 'rw',
+    isa => 'Maybe[Int]',
 );
 
 has is_nullification => (
-    is => 'rw',
+    is  => 'rw',
+    isa => 'Bool',
 );
 
 has is_resolution => (
-    is => 'rw',
+    is  => 'rw',
+    isa => 'Bool',
 );
 
 has changes => (