mirror of
https://github.com/TheAnachronism/docspell.git
synced 2025-06-23 02:48:26 +00:00
Initial version.
Features: - Upload PDF files let them analyze - Manage meta data and items - See processing in webapp
This commit is contained in:
24
modules/webapp/src/main/elm/Data/SourceState.elm
Normal file
24
modules/webapp/src/main/elm/Data/SourceState.elm
Normal file
@ -0,0 +1,24 @@
|
||||
module Data.SourceState exposing (..)
|
||||
|
||||
type SourceState
|
||||
= Active
|
||||
| Disabled
|
||||
|
||||
fromString: String -> Maybe SourceState
|
||||
fromString str =
|
||||
case String.toLower str of
|
||||
"active" -> Just Active
|
||||
"disabled" -> Just Disabled
|
||||
_ -> Nothing
|
||||
|
||||
all: List SourceState
|
||||
all =
|
||||
[ Active
|
||||
, Disabled
|
||||
]
|
||||
|
||||
toString: SourceState -> String
|
||||
toString dir =
|
||||
case dir of
|
||||
Active -> "Active"
|
||||
Disabled -> "Disabled"
|
Reference in New Issue
Block a user