yi-keymap-cua 0.14.1 → 0.15.0

raw patch · 2 files changed

+5/−7 lines, 2 files

Files

• src/Yi/Keymap/Cua.hs +3/−5
• yi-keymap-cua.cabal +2/−2

@@ -29,7 +29,7 @@ import           Yi.Keymap.Emacs.Utils    (askQuitEditor, findFile, isearchKeymap) import           Yi.Keymap.Keys import           Yi.MiniBuffer            (commentRegion)-import           Yi.Misc                  (adjBlock, selectAll)+import           Yi.Misc                  (selectAll) import           Yi.Rectangle             (getRectangle, killRectangle, yankRectangle) import qualified Yi.Rope                  as R (YiString, length, singleton, withText) import           Yi.String                (lines', unlines')@@ -74,16 +74,14 @@   hasSel <- use highlightSelectionA   if hasSel     then getSelectRegionB >>= flip replaceRegionB s-    else do-      when (R.length s == 1) (adjBlock 1)-      insertN s+    else insertN s  deleteSel :: BufferM () -> YiM () deleteSel act = do   haveSelection <- withCurrentBuffer $ use highlightSelectionA   if haveSelection     then withEditor del-    else withCurrentBuffer (adjBlock (-1) >> act)+    else withCurrentBuffer act  cut :: YiM () cut = copy >> withEditor del

@@ -1,9 +1,9 @@--- This file has been generated from package.yaml by hpack version 0.17.0.+-- This file has been generated from package.yaml by hpack version 0.17.1. -- -- see: https://github.com/sol/hpack  name:           yi-keymap-cua-version:        0.14.1+version:        0.15.0 synopsis:       Cua keymap for Yi editor category:       Yi homepage:       https://github.com/yi-editor/yi#readme