Skip to content

Commit 39b04b2

Browse files
committed
[#360] [studio-common] add type annotation
1 parent 9a4f51d commit 39b04b2

File tree

1 file changed

+3
-2
lines changed

1 file changed

+3
-2
lines changed

studio-common/src/Data/Auth.purs

Lines changed: 3 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,8 +1,8 @@
11
module Data.Auth where
22

33
import Prelude
4-
import Data.Foldable (elem)
5-
import Data.Newtype (class Newtype, over, un)
4+
import Data.Foldable (class Foldable, elem)
5+
import Data.Newtype (class Newtype, un)
66
import Data.Set as Set
77
import Data.Set (Set)
88

@@ -30,6 +30,7 @@ instance monoidRoles :: Monoid Roles where
3030
instance showRoles :: Show Roles where
3131
show (Roles x) = show x
3232

33+
rolesFromFoldable :: forall t. Foldable t => t Role -> Roles
3334
rolesFromFoldable = Roles <<< Set.fromFoldable
3435

3536
rolesElem :: Role -> Roles -> Boolean

0 commit comments

Comments
 (0)