Utils internal

eulerfx · eulerfx · commit c10ac2d44d0a · 2015-03-21T08:24:16.000-04:00
diff --git a/src/FSharpx.Async/Utils.fs b/src/FSharpx.Async/Utils.fs
@@ -1,8 +1,8 @@
-﻿module FSharpx.Control.Utils
+﻿module internal FSharpx.Control.Utils
 
 let inline konst a _ = a
 
-module internal Choice =
+module Choice =
   
   /// Maps over the left result type.
   let mapl (f:'a -> 'b) = function
