emenel/dot-doom
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

fixing delete and cua mode off

Browse source
This commit is contained in:
Matt Nish-Lapidus 2025-01-19 16:10:14 -05:00
parent d838ee3251
commit 7903f0510f
2 changed files with 6 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

4
bindings.el
View file

@ -1,6 +1,6 @@
;;; bindings.el -*- lexical-binding: t; -*- ;;; bindings.el -*- lexical-binding: t; -*-
(cua-mode +1) ;; (cua-mode +1)
(map! (:when (modulep! :ui popup) (map! (:when (modulep! :ui popup)
"C-`" #'+popup/toggle "C-`" #'+popup/toggle
@ -549,7 +549,7 @@
;; make esc close completion from corfu ;; make esc close completion from corfu
(map! :map corfu-map [escape] 'corfu-quit) (map! :map corfu-map [escape] 'corfu-quit)
(map! :map sly-mode-map (map! :map sly-mrepl-mode-map
"<up>" #'sly-mrepl-previous-input-or-button "<up>" #'sly-mrepl-previous-input-or-button
"<down>" #'sly-mrepl-next-input-or-button) "<down>" #'sly-mrepl-next-input-or-button)

5
config.el
View file

@ -10,7 +10,7 @@
;; See 'C-h v doom-font' for documentation and more examples of what they ;; See 'C-h v doom-font' for documentation and more examples of what they
;; accept. For example: ;; accept. For example:
(setq doom-font (font-spec :family "JetBrains Mono" :size 20)) (setq doom-font (font-spec :family "JetBrains Mono" :size 19))
(setq fancy-splash-image (concat doom-user-dir "splash.png")) (setq fancy-splash-image (concat doom-user-dir "splash.png"))
(setq doom-theme 'doom-monokai-pro) (setq doom-theme 'doom-monokai-pro)
@ -59,7 +59,7 @@
;; (setq tab-always-indent t) ; don't autocomplete with tab ;; (setq tab-always-indent t) ; don't autocomplete with tab
(+global-word-wrap-mode +1) ; default to soft word wrap (+global-word-wrap-mode +1) ; default to soft word wrap
(delete-selection-mode 1) ; delete stuff! (delete-selection-mode 1) ; delete stuff!
;; (setq delete-active-region t) ; delete selected stuff! (setq delete-active-region t) ; delete selected stuff!
(setq shell-file-name (executable-find "bash")) (setq shell-file-name (executable-find "bash"))
(setq dired-vc-rename-file t) ; renaming and changing files in dired now integrates with magit (setq dired-vc-rename-file t) ; renaming and changing files in dired now integrates with magit
@ -249,7 +249,6 @@
(add-to-list 'backup-directory-alist (add-to-list 'backup-directory-alist
(cons tramp-file-name-regexp nil)) (cons tramp-file-name-regexp nil))
(customize-set-variable 'tramp-backup-directory-alist backup-directory-alist) (customize-set-variable 'tramp-backup-directory-alist backup-directory-alist)
(setq backup-enable-predicate (setq backup-enable-predicate
(lambda (name) nil))) (lambda (name) nil)))