ryuslash/emacs-config
1
0
Fork 0
Code Activity

[oni-core] Make the minibuffer prompt intangible

Browse source
This commit is contained in:
Tom Willemse 2023-08-06 00:04:05 -07:00
parent 4d525286b0
commit e7acc034ee
1 changed files with 9 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
oni-core.el
View file

@ -4,7 +4,7 @@
;; Author: Tom Willemse <tom@ryuslash.org> ;; Author: Tom Willemse <tom@ryuslash.org>
;; Keywords: local ;; Keywords: local
;; Version: 2023.0805.235739 ;; Version: 2023.0806.000329
;; Package-Requires: (oni-data-dir oni-embrace oni-hydra expand-region multiple-cursors gcmh diminish ws-butler which-key insert-char-preview mixed-pitch ace-window vertico marginalia orderless consult embark docstr mini-frame) ;; Package-Requires: (oni-data-dir oni-embrace oni-hydra expand-region multiple-cursors gcmh diminish ws-butler which-key insert-char-preview mixed-pitch ace-window vertico marginalia orderless consult embark docstr mini-frame)
;; This program is free software; you can redistribute it and/or modify ;; This program is free software; you can redistribute it and/or modify
@ -181,7 +181,6 @@ _s_: String list"
(add-hook 'auto-save-hook #'oni-core--ensure-autosave-directory-exists) (add-hook 'auto-save-hook #'oni-core--ensure-autosave-directory-exists)
(add-hook 'before-save-hook 'time-stamp) (add-hook 'before-save-hook 'time-stamp)
(add-hook 'electric-indent-local-mode-hook #'oni-core--switch-newline-keys) (add-hook 'electric-indent-local-mode-hook #'oni-core--switch-newline-keys)
(add-hook 'minibuffer-setup-hook 'electric-pair-local-mode)
(add-hook 'prog-mode-hook 'goto-address-prog-mode) (add-hook 'prog-mode-hook 'goto-address-prog-mode)
(global-set-key (kbd "C-M-SPC") 'er/expand-region) (global-set-key (kbd "C-M-SPC") 'er/expand-region)
@ -366,6 +365,14 @@ _s_: String list"
;;; Remember the place I left at in files when closing them. ;;; Remember the place I left at in files when closing them.
(save-place-mode) (save-place-mode)
;;; Minibuffer
(add-hook 'minibuffer-setup-hook 'electric-pair-local-mode)
(add-hook 'minibuffer-setup-hook 'cursor-intangible-mode)
(setq minibuffer-prompt-properties
(append '(cursor-intangible t) minibuffer-prompt-properties))
;;; Vertico ;;; Vertico
(vertico-mode) (vertico-mode)