adds Modes module
This commit is contained in:
16
src/Modes.elm
Normal file
16
src/Modes.elm
Normal file
@@ -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