From abec87b786d1b06d8700dfd00a821cc946574663 Mon Sep 17 00:00:00 2001
From: Hyperreal Gopher <hyperrealgopher@protonmail.ch>
Date: Wed, 5 Aug 2020 01:01:51 -0700
Subject: [PATCH] Emojis for GifFile and ImageFile entries in menus

---
 CHANGELOG.md              | 6 ++++++
 src/BrickApp/Draw/Menu.hs | 2 ++
 waffle.cabal              | 2 +-
 3 files changed, 9 insertions(+), 1 deletion(-)

diff --git a/CHANGELOG.md b/CHANGELOG.md
index e65a2ca..2e29562 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -6,6 +6,12 @@ and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0
 
 ## [Unreleased]
 
+## [0.15.0] - 2020-08-05
+
+### Add
+
+  * Emojis for `GifFile` and `ImageFile` entries in menus
+
 ## [0.14.0] - 2020-08-05
 
 ### Fix
diff --git a/src/BrickApp/Draw/Menu.hs b/src/BrickApp/Draw/Menu.hs
index 363499e..a8d6dc9 100644
--- a/src/BrickApp/Draw/Menu.hs
+++ b/src/BrickApp/Draw/Menu.hs
@@ -103,6 +103,8 @@ listDrawElement menu indx sel a = cursorRegion <+> possibleNumber <+> withAttr
       (Canonical ct) -> case ct of
         Directory -> withAttr directoryAttr $ txt " 📂 [Directory]"
         File      -> withAttr fileAttr $ txt " 📄 [File]"
+        GifFile   -> withAttr fileAttr $ txt " 🎥 [GIF]"
+        ImageFile -> withAttr fileAttr $ txt " 🖼 [Image]"
         IndexSearchServer ->
           withAttr indexSearchServerAttr $ txt " 🔎 [IndexSearchServer]"
         _ -> withAttr genericTypeAttr $ txt $ " [" <> T.pack (show ct) <> "]"
diff --git a/waffle.cabal b/waffle.cabal
index cb717c0..524e1d5 100644
--- a/waffle.cabal
+++ b/waffle.cabal
@@ -12,7 +12,7 @@ name:                waffle
 -- PVP summary:      +-+------- breaking API changes
 --                   | | +----- non-breaking API additions
 --                   | | | +--- code changes with no API change
-version:             0.14.0.0
+version:             0.15.0.0
 
 -- A short (one-line) description of the package.
 synopsis:            Gopher protocol client