« Viper-mode » : différence entre les versions

De Disposition de clavier bépo
Aucun résumé des modifications
Aucun résumé des modifications
Ligne 28 : Ligne 28 :
(define-key viper-visual-mode-map "r" 'viper-forward-char)
(define-key viper-visual-mode-map "r" 'viper-forward-char)


</nowiki></pre>
vimpulse permet de rajouter quelques commandes vim au viper-mode. Voici l'adaptation correspondante:
<pre class="xkb"><nowiki>
;; vimpulse
(define-key viper-visual-mode-map "h" 'viper-visual-replace-region)
</nowiki></pre>
</nowiki></pre>

Version du 25 mai 2009 à 14:27

Le viper-mode permet d'utiliser les raccourcis les plus importants de vim sous emacs. Voici une adaptation pour échanger les ctsr/hjkl et CTSR/HJKL. À placer à la fin de votre .emacs:

;;;;;;;;;;;;;;;;; bépo                                                                                                             
;;viper                                                                                                                            
(define-key viper-vi-global-user-map "h" 'viper-replace-char)
(define-key viper-vi-global-user-map "H" 'viper-overwrite)
(define-key viper-vi-global-user-map "k" 'viper-substitute)
(define-key viper-vi-global-user-map "K" 'viper-substitute-line)
(define-key viper-vi-global-user-map "j" 'viper-join-lines)

(define-key viper-vi-global-user-map "c" 'viper-backward-char)
(define-key viper-vi-global-user-map "t" 'viper-next-line)
(define-key viper-vi-global-user-map "s" 'viper-previous-line)
(define-key viper-vi-global-user-map "r" 'viper-forward-char)

(define-key viper-vi-global-user-map "C" 'viper-window-top)
(define-key viper-vi-global-user-map "T" 'pager-page-down)
(define-key viper-vi-global-user-map "S" 'pager-page-up) ; no manual :-(
(define-key viper-vi-global-user-map "R" 'viper-window-bottom)


(define-key viper-visual-mode-map "c" 'viper-backward-char)
(define-key viper-visual-mode-map "t" 'viper-next-line)
(define-key viper-visual-mode-map "s" 'viper-previous-line)
(define-key viper-visual-mode-map "r" 'viper-forward-char)