From 288fb195158ce35895622c90866cd4b8fa9dc6d7 Mon Sep 17 00:00:00 2001
From: tv <tv@krebsco.de>
Date: Tue, 23 Feb 2021 20:46:30 +0100
Subject: Main: add Semigroup Command

---
 src/Main.hs | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/src/Main.hs b/src/Main.hs
index 9725d7a..96b34bd 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -174,9 +174,13 @@ data Command
   | DeleteEntireLine
   | Yank Motion
 
+
+instance Semigroup Command where
+    (<>) = Combine
+
+
 instance Monoid Command where
     mempty = Nop
-    mappend = Combine
 
 
 
-- 
cgit v1.2.3