summaryrefslogtreecommitdiffstats
path: root/lisp/init-editing.el
blob: 7caed56de6c949aa2e4cdc9887109a769896f18f (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
;; use zap-up-to-char instead of zap-to-char
(use-package misc
  :bind ("M-z" . zap-up-to-char))

;; enable subword-mode in prog-mode
(use-package subword
  :diminish subword-mode
  :hook ((prog-mode . subword-mode)))

;; find function definitions
(use-package find-func
  ;; make source files read-only when visiting
  :hook ((find-function-after . read-only-mode))

  :bind (("C-h C-f" . find-function-other-window)
         ("C-h C-k" . find-function-on-key)))

(use-package crux
  :ensure t
  :bind (("M-j" . crux-top-join-line)
         ("C-c n" . crux-rename-file-and-buffer)
         ("C-c w" . crux-kill-buffer-truename)
         ("C-c D" . crux-duplicate-current-line-or-region)
         ("C-x C-r" . crux-recentf-find-file)
         ("C-x C-o" . crux-recentf-find-directory)))

;; C-x k kills current buffer
(global-set-key (kbd "C-x k") 'kill-this-buffer)

;; C-- undoes
(global-set-key (kbd "C--") 'undo)

;; kill line also kills newline character
(setq kill-whole-line t)

;; yank discards all text properties
(setq yank-excluded-properties t)

(provide 'init-editing)