mirror of
https://codeberg.org/scip/dot-emacs.git
synced 2025-12-17 12:30:59 +01:00
This line made corfu popup completion in golang fail to initialize because the function has not been found and the whole go-mode-hook went dark. This only happened after the update to 29.1. Using the more modern name fixes things and corfu works again.
164 lines
4.1 KiB
EmacsLisp
164 lines
4.1 KiB
EmacsLisp
;;; *** highlight todo keywords (such as FIXME)
|
|
|
|
;; Absolutely needed!
|
|
|
|
(use-package fic-mode
|
|
:config
|
|
(add-something-to-mode-hooks '(c c++ cperl vala web emacs-lisp ruby python yaml) 'fic-mode))
|
|
|
|
|
|
;;; *** UNDO Tree Mode
|
|
|
|
;; Better undo, with redo support.
|
|
|
|
;; C-_ (`undo-tree-undo')
|
|
;; Undo changes.
|
|
;;
|
|
;; C-: (`undo-tree-redo')
|
|
;; Redo changes.
|
|
;;
|
|
;; more: see undo-tree.el
|
|
(use-package undo-tree
|
|
:config
|
|
|
|
;; use always
|
|
(global-undo-tree-mode)
|
|
|
|
;; M-_ catched by Xmonad
|
|
(global-set-key (kbd "C-:") 'undo-tree-redo)) ; C-: == REDO C-_ == UNDO
|
|
|
|
|
|
|
|
|
|
|
|
;;; *** Which Func
|
|
;; display current function - if any - in mode line
|
|
(add-something-to-mode-hooks
|
|
'(c c++ cperl vala makefile ruby shell-script python go)
|
|
'which-function-mode)
|
|
|
|
|
|
|
|
;;; *** Show current-line in the Fringe
|
|
(use-package fringe-current-line
|
|
:config
|
|
(global-fringe-current-line-mode 1)
|
|
|
|
;; also change the color (matching the mode line
|
|
;; (set-face-attribute 'fringe nil :foreground "NavyBlue")
|
|
)
|
|
|
|
|
|
|
|
;;; *** Save cursor position
|
|
|
|
;; So the next time I start emacs and open a file I were editing
|
|
;; previously, (point) will be in the exact places where it was
|
|
;; before.
|
|
(save-place-mode 1)
|
|
|
|
|
|
|
|
;;; *** Hightligt TABs
|
|
|
|
;; not a mode, but however: higlight TABs in certain modes
|
|
|
|
(defface extra-whitespace-face
|
|
'((t (:background "pale green")))
|
|
"Used for tabs and such.")
|
|
|
|
(defvar tvd-extra-keywords
|
|
'(("\t" . 'extra-whitespace-face)))
|
|
|
|
(add-something-to-mode-hooks '(c c++ vala cperl emacs-lisp python shell-script ruby)
|
|
(lambda () (font-lock-add-keywords nil tvd-extra-keywords)))
|
|
|
|
|
|
;;; *** Browse kill-ring
|
|
|
|
;; when active use n and p to browse, <ret> to select, it's the same
|
|
;; as <M-y> and I never really use it...
|
|
|
|
(use-package browse-kill-ring
|
|
:config
|
|
(setq browse-kill-ring-highlight-current-entry t
|
|
browse-kill-ring-highlight-inserted-item t))
|
|
|
|
|
|
;;; *** goto-last-change
|
|
|
|
;; Very handy, jump to last change[s].
|
|
|
|
(use-package goto-last-change
|
|
:config
|
|
(global-set-key (kbd "C-b") 'goto-last-change))
|
|
|
|
|
|
|
|
;;; *** Bookmarks
|
|
|
|
;; I use the builtin bookmark feature quite a lot and am happy with
|
|
;; it. Especially at work, where many files are located in large
|
|
;; path's on remote storage systems, it great to jump quickly to such
|
|
;; places.
|
|
|
|
;; everytime bookmark is changed, automatically save it
|
|
(setq bookmark-save-flag 1
|
|
bookmark-version-control t)
|
|
|
|
;; I use the same aliases as in apparix for bash (since I'm used to them)
|
|
(defalias 'to 'bookmark-jump)
|
|
(defalias 'bm 'bookmark-set)
|
|
(defalias 'bl 'bookmark-bmenu-list)
|
|
|
|
|
|
|
|
;;; *** which-key
|
|
|
|
;; One of the best unobstrusive modes for key help ever. Just start
|
|
;; entering a key chord, prefix or whatever, and it pops a small
|
|
;; buffer (on the right side in my case) showing the avialable keys to
|
|
;; press from there along with the associated functions.
|
|
|
|
(use-package which-key
|
|
:config
|
|
(which-key-mode)
|
|
(which-key-setup-side-window-right)
|
|
|
|
:init
|
|
(setq which-key-side-window-max-width 0.4
|
|
which-key-max-description-length 50
|
|
which-key-max-display-columns 1))
|
|
|
|
|
|
|
|
;;; *** Beacon mode (pointer blink)
|
|
;; Source: [[https://github.com/Malabarba/beacon][beacon mode]]
|
|
|
|
;; Blink the cursor shortly when moving across large text sections or
|
|
;; when changing windows. That way it is easier to find the current
|
|
;; editing position.
|
|
|
|
(use-package beacon
|
|
:config
|
|
|
|
(setq beacon-blink-duration 0.1
|
|
beacon-blink-when-point-moves-vertically 10
|
|
beacon-color 0.3)
|
|
|
|
(add-hook 'beacon-dont-blink-predicates
|
|
(lambda () (bound-and-true-p novel-mode)))
|
|
|
|
(beacon-mode))
|
|
|
|
|
|
|
|
;;; other aliases
|
|
;; show available colors:
|
|
(defalias 'colors 'list-colors-display)
|
|
|
|
|
|
|
|
(provide 'init-ui)
|
|
;;; init-ui.el ends here
|