about summary refs log tree commit diff
path: root/src/Xanthous/App.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Xanthous/App.hs')
-rw-r--r--src/Xanthous/App.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Xanthous/App.hs b/src/Xanthous/App.hs
index 76e03e860999..b8cda3b77721 100644
--- a/src/Xanthous/App.hs
+++ b/src/Xanthous/App.hs
@@ -411,5 +411,5 @@ entityMenu_ = mkMenuItems @[_] . map entityMenuItem
            then ec
            else 'a'
 
-entityMenu :: Entity entity => [entity] -> Map Char (MenuOption entity)
-entityMenu = map (map runIdentity) . entityMenu_ . fmap Identity
+-- entityMenu :: Entity entity => [entity] -> Map Char (MenuOption entity)
+-- entityMenu = map (map runIdentity) . entityMenu_ . fmap Identity