Guest User

Untitled

a guest
May 25th, 2018
101
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.52 KB | None | 0 0
  1. ;-*- coding: utf-8 -*-
  2. ;; Shortcuts for ERGOEMACS_KEYBOARD_LAYOUT=sp
  3.  
  4. ;;; --------------------------------------------------
  5. ;;; CURSOR MOVEMENTS
  6.  
  7. ;; Single char cursor movement
  8. (defconst ergoemacs-backward-char-key (kbd "M-j"))
  9. (defconst ergoemacs-forward-char-key (kbd "M-l"))
  10. (defconst ergoemacs-previous-line-key (kbd "M-i"))
  11. (defconst ergoemacs-next-line-key (kbd "M-k"))
  12.  
  13. ;; Move by word
  14. (defconst ergoemacs-backward-word-key (kbd "M-u"))
  15. (defconst ergoemacs-forward-word-key (kbd "M-o"))
  16.  
  17. ;; Move by paragraph
  18. (defconst ergoemacs-backward-paragraph-key (kbd "M-U"))
  19. (defconst ergoemacs-forward-paragraph-key (kbd "M-O"))
  20.  
  21. ;; Move to beginning/ending of line
  22. (defconst ergoemacs-move-beginning-of-line-key (kbd "M-h"))
  23. (defconst ergoemacs-move-end-of-line-key (kbd "M-H"))
  24.  
  25. ;; Move by screen (page up/down)
  26. (defconst ergoemacs-scroll-down-key (kbd "M-I"))
  27. (defconst ergoemacs-scroll-up-key (kbd "M-K"))
  28.  
  29. ;; Move to beginning/ending of file
  30. (defconst ergoemacs-beginning-of-buffer-key (kbd "M-J"))
  31. (defconst ergoemacs-end-of-buffer-key (kbd "M-L"))
  32.  
  33. ;; isearch
  34. (defconst ergoemacs-isearch-forward-key (kbd "M-;"))
  35. (defconst ergoemacs-isearch-backward-key (kbd "M-:"))
  36.  
  37. (defconst ergoemacs-recenter-key (kbd "M-p"))
  38.  
  39. ;;; MAJOR EDITING COMMANDS
  40.  
  41. ;; Delete previous/next char.
  42. (defconst ergoemacs-delete-backward-char-key (kbd "M-d"))
  43. (defconst ergoemacs-delete-char-key (kbd "M-f"))
  44.  
  45. ; Delete previous/next word.
  46. (defconst ergoemacs-backward-kill-word-key (kbd "M-e"))
  47. (defconst ergoemacs-kill-word-key (kbd "M-r"))
  48.  
  49. ; Copy Cut Paste, Paste previous
  50. (defconst ergoemacs-kill-region-key (kbd "M-x"))
  51. (defconst ergoemacs-kill-ring-save-key (kbd "M-c"))
  52. (defconst ergoemacs-yank-key (kbd "M-v"))
  53. (defconst ergoemacs-yank-pop-key (kbd "M-V"))
  54. (defconst ergoemacs-copy-all-key (kbd "M-C"))
  55. (defconst ergoemacs-cut-all-key (kbd "M-X"))
  56.  
  57. ;; undo and redo
  58. (defconst ergoemacs-redo-key (kbd "M-Z"))
  59. (defconst ergoemacs-undo-key (kbd "M-z"))
  60.  
  61. ; Kill line
  62. (defconst ergoemacs-kill-line-key (kbd "M-g"))
  63. (defconst ergoemacs-kill-line-backward-key (kbd "M-G"))
  64.  
  65. ;;; Textual Transformation
  66.  
  67. (defconst ergoemacs-mark-paragraph-key (kbd "M-S-SPC"))
  68. (defconst ergoemacs-shrink-whitespaces-key (kbd "M-w"))
  69. (defconst ergoemacs-comment-dwim-key (kbd "M-'"))
  70. (defconst ergoemacs-toggle-letter-case-key (kbd "M-/"))
  71.  
  72. ; keyword completion, because Alt+Tab is used by OS
  73. (defconst ergoemacs-call-keyword-completion-key (kbd "M-t"))
  74.  
  75. ; Hard-wrap/un-hard-wrap paragraph
  76. (defconst ergoemacs-compact-uncompact-block-key (kbd "M-q"))
  77.  
  78. ;;; EMACS'S SPECIAL COMMANDS
  79.  
  80. ; Mark point.
  81. (defconst ergoemacs-set-mark-command-key (kbd "M-SPC"))
  82.  
  83. (defconst ergoemacs-execute-extended-command-key (kbd "M-a"))
  84. (defconst ergoemacs-shell-command-key (kbd "M-A"))
  85.  
  86. ;;; WINDOW SPLITING
  87. (defconst ergoemacs-move-cursor-next-pane-key (kbd "M-s"))
  88. (defconst ergoemacs-move-cursor-previous-pane-key (kbd "M-S"))
  89.  
  90. ;;; --------------------------------------------------
  91. ;;; OTHER SHORTCUTS
  92.  
  93. (defconst ergoemacs-switch-to-previous-frame-key (kbd "M-ª"))
  94. (defconst ergoemacs-switch-to-next-frame-key (kbd "M-º"))
  95.  
  96. (defconst ergoemacs-query-replace-key (kbd "M-5"))
  97. (defconst ergoemacs-query-replace-regexp-key (kbd "M-%"))
  98.  
  99. (defconst ergoemacs-delete-other-windows-key (kbd "M-1"))
  100. (defconst ergoemacs-delete-window-key (kbd "M-!"))
  101.  
  102. (defconst ergoemacs-split-window-vertically-key (kbd "M-2"))
  103. (defconst ergoemacs-split-window-horizontally-key (kbd "M-\""))
  104.  
  105. (defconst ergoemacs-extend-selection-key (kbd "M-8"))
  106. (defconst ergoemacs-select-text-in-quote-key (kbd "M-*"))
Add Comment
Please, Sign In to add comment