TheAnachronism/docspell
1
0
Fork 0
mirror of https://github.com/TheAnachronism/docspell.git synced 2025-03-25 16:45:05 +00:00
Code Issues Packages Projects Releases Wiki Activity

Add subject-filter to scan-mailbox-form

Browse Source
This commit is contained in:
Eike Kettner 2020-11-13 21:35:31 +01:00
parent 5034e12bec
commit ec5b822e09
1 changed files with 79 additions and 40 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

119
modules/webapp/src/main/elm/Comp/ScanMailboxForm.elm
View File

@ -63,6 +63,7 @@ type alias Model =
, tagModel : Comp.Dropdown.Model Tag , tagModel : Comp.Dropdown.Model Tag
, existingTags : List String , existingTags : List String
, fileFilter : Maybe String , fileFilter : Maybe String
, subjectFilter : Maybe String
} }
@ -94,6 +95,7 @@ type Msg
| GetTagResp (Result Http.Error TagList) | GetTagResp (Result Http.Error TagList)
| TagDropdownMsg (Comp.Dropdown.Msg Tag) | TagDropdownMsg (Comp.Dropdown.Msg Tag)
| SetFileFilter String | SetFileFilter String
| SetSubjectFilter String
initWith : Flags -> ScanMailboxSettings -> ( Model, Cmd Msg ) initWith : Flags -> ScanMailboxSettings -> ( Model, Cmd Msg )
@ -135,6 +137,7 @@ initWith flags s =
Maybe.map .items s.tags Maybe.map .items s.tags
|> Maybe.withDefault [] |> Maybe.withDefault []
, fileFilter = s.fileFilter , fileFilter = s.fileFilter
, subjectFilter = s.subjectFilter
} }
, Cmd.batch , Cmd.batch
[ Api.getImapSettings flags "" ConnResp [ Api.getImapSettings flags "" ConnResp
@ -184,6 +187,7 @@ init flags =
, tagModel = Util.Tag.makeDropdownModel , tagModel = Util.Tag.makeDropdownModel
, existingTags = [] , existingTags = []
, fileFilter = Nothing , fileFilter = Nothing
, subjectFilter = Nothing
} }
, Cmd.batch , Cmd.batch
[ Api.getImapSettings flags "" ConnResp [ Api.getImapSettings flags "" ConnResp
@ -228,6 +232,7 @@ makeSettings model =
, schedule = Data.CalEvent.makeEvent timer , schedule = Data.CalEvent.makeEvent timer
, itemFolder = model.itemFolderId , itemFolder = model.itemFolderId
, fileFilter = model.fileFilter , fileFilter = model.fileFilter
, subjectFilter = model.subjectFilter
, tags = , tags =
case Comp.Dropdown.getSelected model.tagModel of case Comp.Dropdown.getSelected model.tagModel of
[] -> [] ->
@ -586,6 +591,12 @@ update flags msg model =
, Cmd.none , Cmd.none
) )
SetSubjectFilter str ->
( { model | subjectFilter = Util.Maybe.fromString str }
, NoAction
, Cmd.none
)
--- View --- View
@ -653,13 +664,6 @@ view extraClasses settings model =
[ text "The folders to go through" [ text "The folders to go through"
] ]
] ]
, Html.map ReceivedHoursMsg
(Comp.IntField.viewWithInfo
"Select mails newer than `now - receivedHours`"
model.receivedHours
"field"
model.receivedHoursModel
)
, div [ class "field" ] , div [ class "field" ]
[ label [] [ text "Target folder" ] [ label [] [ text "Target folder" ]
, input , input
@ -688,6 +692,74 @@ view extraClasses settings model =
, text " is not set." , text " is not set."
] ]
] ]
, div [ class "ui dividing header" ]
[ text "Filter"
]
, Html.map ReceivedHoursMsg
(Comp.IntField.viewWithInfo
"Select mails newer than `now - receivedHours`"
model.receivedHours
"field"
model.receivedHoursModel
)
, div
[ class "field"
]
[ label [] [ text "File Filter" ]
, input
[ type_ "text"
, onInput SetFileFilter
, placeholder "File Filter"
, model.fileFilter
|> Maybe.withDefault ""
|> value
]
[]
, div [ class "small-info" ]
[ text "Specify a file glob to filter attachments. For example, to only extract pdf files: "
, code []
[ text "*.pdf"
]
, text ". If you want to include the mail body, allow html files or "
, code []
[ text "mail.html"
]
, text ". Globs can be combined via OR, like this: "
, code []
[ text "*.pdf|mail.html"
]
, text ". No file filter defaults to "
, code []
[ text "*"
]
, text " that includes all"
]
]
, div
[ class "field"
]
[ label [] [ text "Subject Filter" ]
, input
[ type_ "text"
, onInput SetSubjectFilter
, placeholder "Subject Filter"
, model.subjectFilter
|> Maybe.withDefault ""
|> value
]
[]
, div [ class "small-info" ]
[ text "Specify a file glob to filter mails by subject. For example: "
, code []
[ text "*Scanned Document*"
]
, text ". No file filter defaults to "
, code []
[ text "*"
]
, text " that includes all"
]
]
, div [ class "ui dividing header" ] , div [ class "ui dividing header" ]
[ text "Metadata" [ text "Metadata"
] ]
@ -763,39 +835,6 @@ disappear then.
[ text "Choose tags that should be applied to items." [ text "Choose tags that should be applied to items."
] ]
] ]
, div
[ class "field"
]
[ label [] [ text "File Filter" ]
, input
[ type_ "text"
, onInput SetFileFilter
, placeholder "File Filter"
, model.fileFilter
|> Maybe.withDefault ""
|> value
]
[]
, div [ class "small-info" ]
[ text "Specify a file glob to filter attachments. For example, to only extract pdf files: "
, code []
[ text "*.pdf"
]
, text ". If you want to include the mail body, allow html files or "
, code []
[ text "mail.html"
]
, text ". Globs can be combined via OR, like this: "
, code []
[ text "*.pdf|mail.html"
]
, text "No file filter defaults to "
, code []
[ text "*"
]
, text " that includes all"
]
]
, div [ class "ui dividing header" ] , div [ class "ui dividing header" ]
[ text "Schedule" [ text "Schedule"
] ]