Update DomainPrimitiveTypes.fs

swlaschin · Jun 2, 2014 · f62a2d6 · f62a2d6
1 parent e985f9f
commit f62a2d6
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/FsRopExample/DomainPrimitiveTypes.fs b/src/FsRopExample/DomainPrimitiveTypes.fs
@@ -55,8 +55,8 @@ module EmailAddress =
 module CustomerId  =
     type T = CustomerId of int
 
-    // Create a CustomerId from a nullable int
-    // I'm using nullable just to demonstrate how to use it as input
+    // Create a CustomerId from an int
+    // It must be positive.
     let create (i: int) =
         if i < 1 then
             fail MustBePositiveInteger