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

De Disposition de clavier bépo
Aucun résumé des modifications
mAucun résumé des modifications
Ligne 3 : Ligne 3 :
À placer à la fin de votre .emacs:
À placer à la fin de votre .emacs:


<pre class="xkb"><nowiki>
<source lang="lisp">
;;;;;;;;;;;;;;;;; bépo                                                                                                             
;;;;;;;;;;;;;;;;; bépo                                                                                                             
;;viper                                                                                                                             
;;viper                                                                                                                             
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>
</source>

Version du 5 septembre 2009 à 22:13

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)