diff options
| -rw-r--r-- | TreeView.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/TreeView.hs b/TreeView.hs index a878572..0d95133 100644 --- a/TreeView.hs +++ b/TreeView.hs @@ -71,7 +71,7 @@ treeViewId = \case TVIDSearch (T.pack s) TVSearchResult sr -> - TVIDSearch (T.pack $ unThreadID $ searchThread sr) + TVIDSearchResult (T.pack $ unThreadID $ searchThread sr) where fromMessage = T.pack . unMessageID . messageId |