rasa-ext-vim 0.1.7 → 0.1.8
raw patch · 2 files changed
+21/−21 lines, 2 filesdep ~rasadep ~rasa-ext-viewsdep ~rasa-ext-vim
Dependency ranges changed: rasa, rasa-ext-views, rasa-ext-vim
Files
- rasa-ext-vim.cabal +4/−4
- src/Rasa/Ext/Vim.hs +17/−17
rasa-ext-vim.cabal view
@@ -1,5 +1,5 @@ name: rasa-ext-vim-version: 0.1.7+version: 0.1.8 cabal-version: >=1.10 build-type: Simple license: GPL-3@@ -22,9 +22,9 @@ Rasa.Ext.Vim build-depends: base >=4.8 && <5,- rasa >=0.1.11 && <0.2,+ rasa >=0.1.12 && <0.2, rasa-ext-files >=0.1.5 && <0.2,- rasa-ext-views >=0.1.5 && <0.2,+ rasa-ext-views >=0.1.6 && <0.2, rasa-ext-cursors >=0.1.7 && <0.2, text >=1.2.2.1 && <1.3, yi-rope >=0.7.0.2 && <0.8,@@ -41,7 +41,7 @@ main-is: Spec.hs build-depends: base >=4.9.0.0 && <4.10,- rasa-ext-vim >=0.1.7 && <0.2,+ rasa-ext-vim >=0.1.8 && <0.2, hspec >=2.2.4 && <2.3 default-language: Haskell2010 default-extensions: OverloadedStrings
src/Rasa/Ext/Vim.hs view
@@ -81,9 +81,9 @@ -- | Listeners for keypresses that run regardless of current mode. anyMode :: [Keypress] -> BufAction ()-anyMode [Keypress 'c' [Ctrl]] = liftApp exit-anyMode [KPageDown []] = liftApp $ scrollBy 14 -- Page down-anyMode [KPageUp []] = liftApp $ scrollBy (-14) -- Page up+anyMode [Keypress 'c' [Ctrl]] = runApp exit+anyMode [KPageDown []] = runApp $ scrollBy 14 -- Page down+anyMode [KPageUp []] = runApp $ scrollBy (-14) -- Page up anyMode [KHome []] = startOfLine anyMode [KEnd []] = endOfLine anyMode _ = return ()@@ -111,22 +111,22 @@ normal [Keypress 's' []] = addHist $ Keypress 's' [] normal [Keypress 's' [], Keypress 'n' []] = toggleLineNumbers -normal [Keypress '+' []] = liftApp nextBuf-normal [Keypress '-' []] = liftApp prevBuf-normal [Keypress 'w' [Ctrl]] = liftApp hSplit-normal [Keypress 'v' [Ctrl]] = liftApp vSplit-normal [Keypress 'o' [Ctrl]] = liftApp closeInactive-normal [Keypress 'r' [Ctrl]] = liftApp rotate+normal [Keypress '+' []] = runApp nextBuf+normal [Keypress '-' []] = runApp prevBuf+normal [Keypress 'w' [Ctrl]] = runApp hSplit+normal [Keypress 'v' [Ctrl]] = runApp vSplit+normal [Keypress 'o' [Ctrl]] = runApp closeInactive+normal [Keypress 'r' [Ctrl]] = runApp rotate -normal [Keypress 'e' [Ctrl]] = liftApp $ scrollBy 1 -- Scroll down-normal [Keypress 'd' [Ctrl]] = liftApp $ scrollBy 7 -- Half-Page down-normal [Keypress 'y' [Ctrl]] = liftApp $ scrollBy (-1) -- Scroll up-normal [Keypress 'u' [Ctrl]] = liftApp $ scrollBy (-7) -- Half-Page up+normal [Keypress 'e' [Ctrl]] = runApp $ scrollBy 1 -- Scroll down+normal [Keypress 'd' [Ctrl]] = runApp $ scrollBy 7 -- Half-Page down+normal [Keypress 'y' [Ctrl]] = runApp $ scrollBy (-1) -- Scroll up+normal [Keypress 'u' [Ctrl]] = runApp $ scrollBy (-7) -- Half-Page up -normal [KLeft []] = liftApp focusViewLeft-normal [KRight []] = liftApp focusViewRight-normal [KUp []] = liftApp focusViewAbove-normal [KDown []] = liftApp focusViewBelow+normal [KLeft []] = runApp focusViewLeft+normal [KRight []] = runApp focusViewRight+normal [KUp []] = runApp focusViewAbove+normal [KDown []] = runApp focusViewBelow normal [Keypress 'G' []] = do