diff options
| author | tv <tv@krebsco.de> | 2020-09-30 11:45:41 +0200 |
|---|---|---|
| committer | tv <tv@krebsco.de> | 2020-09-30 15:39:23 +0200 |
| commit | 63bf1907d3e6629ac21da87b9e45303bcec2bdf9 (patch) | |
| tree | eebf73eec52795524f7cdcba6cc32272521565a0 /src/Much/TreeView/Types.hs | |
| parent | f8b93d1f7150f6122ecf145936b9ac1abf413e2b (diff) | |
render non-text parts
Diffstat (limited to 'src/Much/TreeView/Types.hs')
| -rw-r--r-- | src/Much/TreeView/Types.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/Much/TreeView/Types.hs b/src/Much/TreeView/Types.hs index 6e4ac6b..f30b0bc 100644 --- a/src/Much/TreeView/Types.hs +++ b/src/Much/TreeView/Types.hs @@ -16,6 +16,7 @@ data TreeView | TVMessageHeaderField Message (CI.CI T.Text) | TVMessagePart Message MessagePart | TVMessageQuoteLine Message MessagePart LineNr String + | TVMessageRawLine Message MessagePart LineNr String | TVMessageLine Message MessagePart LineNr String | TVSearch String | TVSearchResult SearchResult @@ -53,6 +54,9 @@ treeViewId = \case TVMessageQuoteLine m mp lineNr _ -> TVIDMessageLine (fromMessage m) (partID mp) lineNr + TVMessageRawLine m mp lineNr _ -> + TVIDMessageLine (fromMessage m) (partID mp) lineNr + TVSearch s -> TVIDSearch (T.pack s) |