Hi!
I fixed issue 202, it seems it was an easy one.
Darcs patch in attatchment.

BTW: Is it ok to do "darcs send -o patch" and post it here like this one?
Just sending makes my darcs complain about sendmail.

Cheers,
-- 
Krzysiek

--~--~---------~--~----~------------~-------~--~----~
Yi development mailing list
yi-devel@googlegroups.com
http://groups.google.com/group/yi-devel
-~----------~----~----~----~------~----~------~--~---

Tue Dec  2 19:34:46 CET 2008  Krzysztof Goj <[EMAIL PROTECTED]>
  * Issue 202: indentation and Vim commands
  Added indentation-awareness to cutRegion, pasteBefore and pasteAfter.

New patches:

[Issue 202: indentation and Vim commands
Krzysztof Goj <[EMAIL PROTECTED]>**20081202183446
 Added indentation-awareness to cutRegion, pasteBefore and pasteAfter.
] hunk ./Yi/Keymap/Vim.hs 561
      cutRegion regionStyle region = do
        txt <- withBuffer0 $ do
          txt <- readRegionB region
+         adjBlock $ negate $ length txt
          deleteRegionB region
          return txt
        setRegE $ if (regionStyle == LineWise) then '\n':txt else txt
hunk ./Yi/Keymap/Vim.hs 590
      pasteAfter :: EditorM ()
      pasteAfter = do
        txt' <- getRegE
-       withBuffer0 $
+       withBuffer0 $ do
+         adjBlock $ length txt'
          case txt' of
            '\n':txt -> moveToEol >> rightB >> insertN txt >> leftN (length txt)
            _      -> moveXorEol 1 >> insertN txt' >> leftB
hunk ./Yi/Keymap/Vim.hs 600
      pasteBefore = do
        txt' <- getRegE
        withBuffer0 $ do
+         adjBlock $ length txt'
          case txt' of
            '\n':txt -> moveToSol >> insertN txt >> leftN (length txt)
            _      -> insertN txt' >> leftB

Context:

[replace all: more helpful message
[EMAIL PROTECTED] 
[fix build
[EMAIL PROTECTED] 
[Better word and WORD motions for Vim keymap.
Krzysztof Goj <[EMAIL PROTECTED]>**20081202132813] 
[doc
[EMAIL PROTECTED] 
[Yi/Users/Gwern.hs: +shorter binding for gotoLn
[EMAIL PROTECTED]
 Ignore-this: 5defc56344c3e1c61bd602d192e06af3
 I find the default Emacs binding of M-g g tedious; why not just M-g?
] 
[doc
[EMAIL PROTECTED] 
[make Accessor instance of Category
[EMAIL PROTECTED] 
[use Control.Category
[EMAIL PROTECTED] 
[Yi.Keymap.Emacs: +standard emacs M-; binding
[EMAIL PROTECTED]
 Ignore-this: 5abf2d7154acfdcce44286f34ec238b9
] 
[update to base>=4; replace all Control.Exception with Control.OldException
[EMAIL PROTECTED]
 Ignore-this: 205b7c23a4ffcc16b8612d0b4edc9352
] 
[better support for vivid colors
[EMAIL PROTECTED] 
[Main.hs: minor indent
[EMAIL PROTECTED]
 Ignore-this: b53fd55beb556c92b6bba9ee4a49cd61
] 
[added C-w and C-u to ex mode
Aleksandar Dimitrov <[EMAIL PROTECTED]>**20081201103414] 
['ZZ' closes window, not editor, 'ZQ' == ':q!'
Aleksandar Dimitrov <[EMAIL PROTECTED]>**20081201103311] 
[bump version number
[EMAIL PROTECTED] 
[TAG 0.5.2
[EMAIL PROTECTED] 
Patch bundle hash:
71be7a31a5f3fd2322710329efd19f5766d10377

Reply via email to