fnord

emacs/module/module-corfu.el

@@ -12,14 +12,12 @@
 (setq corfu-cycle t)                ;; Enable cycling for `corfu-next/previous'
 (setq corfu-auto t)                 ;; Enable auto completion
 (setq corfu-separator ?\s)          ;; Orderless field separator
-;; (setq corfu-quit-at-boundary nil)   ;; Never quit at completion boundary
-(setq corfu-quit-no-match nil)      ;; Never quit, even if there is no match
+(setq corfu-quit-at-boundary t)   ;; Never quit at completion boundary
+(setq corfu-quit-no-match t)      ;; Never quit, even if there is no match
 ;; (setq corfu-preview-current nil)    ;; Disable current candidate preview
 ;; (setqcorfu-preselect 'prompt)      ;; Preselect the prompt
-;; (setq corfu-on-exact-match nil)     ;; Configure handling of exact matches
+(setq corfu-on-exact-match t)     ;; Configure handling of exact matches
 ;; (setq corfu-scroll-margin 5)        ;; Use scroll margin
-
-
 (setq tab-always-indent 'complete)
 (setq text-mode-ispell-word-completion nil)
 (setq read-extended-command-predicate #'command-completion-default-include-p)

emacs/module/module-dired.el

@@ -44,6 +44,7 @@
 (define-key dired-mode-map [mouse-2] 'my/dired-mouse-find-file)
 (global-set-key (kbd "<f12>") 'dired-sidebar-toggle-sidebar)
 (define-key dired-mode-map (kbd "C-c d") 'my/dired-duplicate-file)
+(define-key dired-mode-map (kbd "C-c t") 'dired-create-empty-file)
 
 (provide 'module-dired)
 

emacs/module/module-perspective.el

@@ -14,12 +14,6 @@
 (persp-turn-off-modestring)
 (setq doom-modeline-persp-name t)
 
-(defun my-persp-save ()
-  (persp-state-save "~/.config/emacs/perspectives"))
-
-(defun my-persp-load ()
-  (persp-state-load "~/.config/emacs/perspectives"))
-
 (defun create-perspectives-for-projects (root-dir)
   "Create perspectives for each subdirectory in ROOT-DIR."
   (interactive "DSelect root directory: ")
@@ -31,6 +25,11 @@
           (dired dir)
           (persp-add-buffer (current-buffer)))))))
 
+;; auto-create common perspectives
+(persp-switch "notes")
+(dired "~/eris/notes")
+(persp-add-buffer (current-buffer))
+(persp-switch "main")
 
 (global-set-key (kbd "C-x k") 'persp-kill-buffer*)
 (global-set-key (kbd "C-x x s") 'persp-switch)

emacs/module/module-region.el

@@ -8,6 +8,8 @@
 
 (require 'module-pkg)
 (pkg/require 'expand-region)
+(pkg/require 'surround)
 
+(global-set-key (kbd "M-'") surround-keymap)
 (provide 'module-region)
 ;;; module-region.el ends here.