diff options
Diffstat (limited to 'modules')
| -rw-r--r-- | modules/keybindings.el | 2 | ||||
| -rw-r--r-- | modules/music-config.el | 1 | ||||
| -rw-r--r-- | modules/user-constants.el | 6 |
3 files changed, 8 insertions, 1 deletions
diff --git a/modules/keybindings.el b/modules/keybindings.el index 9d5ba454..462fde24 100644 --- a/modules/keybindings.el +++ b/modules/keybindings.el @@ -108,7 +108,7 @@ Errors if VAR is unbound, not a non-empty string, or the file does not exist." ;; Avoid hostile bindings (keymap-global-unset "C-x C-f") ;; find-file-read-only (keymap-global-set "C-x C-f" #'find-file) -(keymap-global-unset "C-z") ;; suspend-frame is accidentally hit often +(keymap-global-set "C-z" (make-sparse-keymap)) ;; replace suspend-frame with prefix map (keymap-global-unset "M-o") ;; facemenu-mode ;; Add commonly-used general keybindings diff --git a/modules/music-config.el b/modules/music-config.el index 9542075f..d281c329 100644 --- a/modules/music-config.el +++ b/modules/music-config.el @@ -241,6 +241,7 @@ Signals user-error if missing or deleted." Directories (trailing /) are added recursively; files added singly." (interactive) (let* ((completion-ignore-case t) + (orderless-smart-case nil) (candidates (cj/music--collect-entries-recursive cj/music-root)) (choice-rel (completing-read "Choose music file or directory: " (cj/music--completion-table candidates) diff --git a/modules/user-constants.el b/modules/user-constants.el index 717e179e..b1f6016b 100644 --- a/modules/user-constants.el +++ b/modules/user-constants.el @@ -142,6 +142,12 @@ Stored in .emacs.d/data/ so each machine syncs independently from Proton Calenda "The location of the org file containing DeepSat Calendar information. Stored in .emacs.d/data/ so each machine syncs independently from Google Calendar.") +;; Ensure calendar data files exist so org-agenda-list doesn't hang +;; prompting for missing files (calendar-sync populates them on first sync) +(dolist (f (list gcal-file pcal-file dcal-file)) + (unless (file-exists-p f) + (make-empty-file f t))) + (defvar reference-file (expand-file-name "reference.org" org-dir) "The location of the org file containing reference information.") |