« Viper-mode » : différence entre les versions
mAucun résumé des modifications |
(Ajout de la catégorie "Logiciels") |
||
| (2 versions intermédiaires par un autre utilisateur non affichées) | |||
| Ligne 1 : | Ligne 1 : | ||
Le viper-mode permet d'utiliser les raccourcis les plus importants de | Le ''viper-mode'' permet d'utiliser les raccourcis les plus importants de [[Vim]] sous [[Emacs]]. Voici une adaptation pour échanger fonctionnellement les touches {{t|c}} {{t|t}} {{t|s}} {{t|r}} par {{ta|h}} {{ta|j}} {{ta|k}} {{ta|l}} et {{t|C}} {{t|T}} {{t|S}} {{t|R}} par {{ta|H}} {{ta|J}} {{ta|K}} {{ta|L}}. | ||
Voici une adaptation pour échanger les | |||
À placer à la fin de votre .emacs: | À placer à la fin de votre {{c|~/.emacs}} : | ||
<source lang="lisp"> | <source lang="lisp"> | ||
; bépo-viper | |||
(define-key viper-vi-global-user-map "h" 'viper-replace-char) | (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 "H" 'viper-overwrite) | ||
| Ligne 21 : | Ligne 21 : | ||
(define-key viper-vi-global-user-map "S" 'pager-page-up) ; no manual :-( | (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-vi-global-user-map "R" 'viper-window-bottom) | ||
(define-key viper-visual-mode-map "c" 'viper-backward-char) | (define-key viper-visual-mode-map "c" 'viper-backward-char) | ||
| Ligne 27 : | Ligne 26 : | ||
(define-key viper-visual-mode-map "s" 'viper-previous-line) | (define-key viper-visual-mode-map "s" 'viper-previous-line) | ||
(define-key viper-visual-mode-map "r" 'viper-forward-char) | (define-key viper-visual-mode-map "r" 'viper-forward-char) | ||
</source> | </source> | ||
[[Catégorie:Logiciels]] | |||
Dernière version du 27 mars 2023 à 15:28
Le viper-mode permet d'utiliser les raccourcis les plus importants de Vim sous Emacs. Voici une adaptation pour échanger fonctionnellement les touches clavier bépoc clavier bépot clavier bépos clavier bépor par clavier azertyh clavier azertyj clavier azertyk clavier azertyl et clavier bépoC clavier bépoT clavier bépoS clavier bépoR par clavier azertyH clavier azertyJ clavier azertyK clavier azertyL.
À 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)