diff options
| author | tv <tv@krebsco.de> | 2021-02-23 20:46:30 +0100 |
|---|---|---|
| committer | tv <tv@krebsco.de> | 2021-02-23 20:46:30 +0100 |
| commit | 288fb195158ce35895622c90866cd4b8fa9dc6d7 (patch) | |
| tree | 6412424631bc6782b9dc25e06c7a97237a2aa5bf | |
| parent | 9d529a570e84540fafde36d0e0adba87a610c126 (diff) | |
Main: add Semigroup Command
| -rw-r--r-- | src/Main.hs | 6 |
1 files changed, 5 insertions, 1 deletions
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 |