mirror of
https://github.com/TheAnachronism/docspell.git
synced 2025-06-23 02:48:26 +00:00
32 lines
497 B
Elm
32 lines
497 B
Elm
{-
|
|
Copyright 2020 Eike K. & Contributors
|
|
|
|
SPDX-License-Identifier: AGPL-3.0-or-later
|
|
-}
|
|
|
|
|
|
module Data.CustomFieldOrder exposing (CustomFieldOrder(..), asString)
|
|
|
|
|
|
type CustomFieldOrder
|
|
= LabelAsc
|
|
| LabelDesc
|
|
| FormatAsc
|
|
| FormatDesc
|
|
|
|
|
|
asString : CustomFieldOrder -> String
|
|
asString order =
|
|
case order of
|
|
LabelAsc ->
|
|
"label"
|
|
|
|
LabelDesc ->
|
|
"-label"
|
|
|
|
FormatAsc ->
|
|
"type"
|
|
|
|
FormatDesc ->
|
|
"-type"
|