RenderTreeView: quoteSpecials in subjectHEAD1.3.2master

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