mirror of
https://github.com/TheAnachronism/docspell.git
synced 2025-06-23 19:08:26 +00:00
Reorganize messages to reflect page structure
This commit is contained in:
19
modules/webapp/src/main/elm/Messages/Data/PersonUse.elm
Normal file
19
modules/webapp/src/main/elm/Messages/Data/PersonUse.elm
Normal file
@ -0,0 +1,19 @@
|
||||
module Messages.Data.PersonUse exposing (..)
|
||||
|
||||
import Data.PersonUse exposing (PersonUse(..))
|
||||
|
||||
|
||||
gb : PersonUse -> String
|
||||
gb pu =
|
||||
case pu of
|
||||
Correspondent ->
|
||||
"Correspondent"
|
||||
|
||||
Concerning ->
|
||||
"Concerning"
|
||||
|
||||
Both ->
|
||||
"Both"
|
||||
|
||||
Disabled ->
|
||||
"Disabled"
|
Reference in New Issue
Block a user