adds Modes module
This commit is contained in:
1 parent
c968da15f0
commit
21650c4011
1 file changed
+16
@@ -0,0 +1,16 @@
|
|||||||
|
module Modes exposing (..)
|
||||||
|
|
||||||
|
type ViewMode
|
||||||
|
= Sell
|
||||||
|
| Buy
|
||||||
|
| Grab
|
||||||
|
| Add
|
||||||
|
|
||||||
|
|
||||||
|
canSelectIn : ViewMode -> Bool
|
||||||
|
canSelectIn mode =
|
||||||
|
case mode of
|
||||||
|
Sell -> True
|
||||||
|
Buy -> True
|
||||||
|
Grab -> True
|
||||||
|
Add -> False
|
||||||
Reference in new issue
Block a user