summaryrefslogtreecommitdiffstats
path: root/src/Much
diff options
context:
space:
mode:
authortv <tv@krebsco.de>2023-02-06 00:47:05 +0100
committertv <tv@krebsco.de>2023-02-06 00:48:58 +0100
commit40ed964ca4a4a4e3ee9b4c4250fa6d0f049c629a (patch)
tree393d7d13dd0959e5cae41ad83ab2e04ba5049c00 /src/Much
parent3fb447fe006a48bb1e7ecfee3ea0bae2871f78b7 (diff)
RenderTreeView: quoteSpecials in subject1.3.2
Diffstat (limited to 'src/Much')
-rw-r--r--src/Much/RenderTreeView.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Much/RenderTreeView.hs b/src/Much/RenderTreeView.hs
index ebed6e0..ea81fe2 100644
--- a/src/Much/RenderTreeView.hs
+++ b/src/Much/RenderTreeView.hs
@@ -13,6 +13,7 @@ import qualified Data.Text as T
import qualified Data.Tree.Zipper as Z
import qualified Much.TreeZipperUtils as Z
import Blessings
+import Blessings.String.Extra (quoteSpecials)
import Control.Arrow
import Data.Char
import Data.Function
@@ -133,7 +134,7 @@ renderTreeView1 q@State{..} hasFocus x = case x of
authors = Plain $ T.unpack $ Notmuch.searchAuthors sr
date = color Much.State.date colorConfig $ renderDate now x
- subject = Plain $ T.unpack $ Notmuch.searchSubject sr
+ subject = quoteSpecials $ Plain $ T.unpack $ Notmuch.searchSubject sr
tags = color Much.State.tags colorConfig $ renderTags q (Notmuch.searchTags sr)
title = if subject /= "" then subject else c_authors authors
in