diff options
author | Marc Coquand <marc@mccd.space> | 2024-11-02 21:00:53 +0200 |
---|---|---|
committer | Marc Coquand <marc@mccd.space> | 2024-11-02 21:00:53 +0200 |
commit | 21d9cfaee14110e95c4385dccead33a9dc9d9423 (patch) | |
tree | ac9689be5edd35eb73b18e93c504fd4ddbc47cf4 /home | |
parent | bc989cad9db883914868470347bf1a0fd0e5f7bd (diff) | |
download | guix-21d9cfaee14110e95c4385dccead33a9dc9d9423.tar.gz guix-21d9cfaee14110e95c4385dccead33a9dc9d9423.tar.bz2 guix-21d9cfaee14110e95c4385dccead33a9dc9d9423.zip |
.
Diffstat (limited to 'home')
-rw-r--r-- | home/dots/.emacs | 23 |
1 files changed, 16 insertions, 7 deletions
diff --git a/home/dots/.emacs b/home/dots/.emacs index 95aa554..ae44e38 100644 --- a/home/dots/.emacs +++ b/home/dots/.emacs @@ -3,6 +3,7 @@ (fset 'yes-or-no-p 'y-or-n-p) (setq default-frame-alist '((font . "Iosevka SS13 Extended") + (bottom-divider-width . 2) (height . 150) (line-spacing . 0.5)) ;; undo @@ -101,19 +102,24 @@ (shell-command "scrot -s -F '/home/mccd/screenshots/%Y-%m-%d_$wx$h.png'"))) (exwm-input-set-key (kbd "<XF86AudioMute>") (lambda () (interactive) - (shell-command "amixer set Master toggle 1> /dev/null"))) + (let ((inhibit-message t)) + (shell-command "amixer set Master toggle 1> /dev/null")))) (exwm-input-set-key (kbd "<XF86AudioRaiseVolume>") (lambda () (interactive) - (shell-command "amixer set Master 10%+ 1> /dev/null"))) + (let ((inhibit-message t)) + (shell-command "amixer set Master 10%+ 1> /dev/null")))) (exwm-input-set-key (kbd "<XF86AudioLowerVolume>") (lambda () (interactive) - (shell-command "amixer set Master 10%- 1> /dev/null"))) + (let ((inhibit-message t)) + (shell-command "amixer set Master 10%- 1> /dev/null")))) (exwm-input-set-key (kbd "<XF86MonBrightnessDown>") (lambda () (interactive) - (shell-command "brightnessctl set 5%- 1> /dev/null"))) + (let ((inhibit-message t)) + (shell-command "brightnessctl set 5%- 1> /dev/null")))) (exwm-input-set-key (kbd "<XF86MonBrightnessUp>") (lambda () (interactive) - (shell-command "brightnessctl set +5% 1> /dev/null"))) + (let ((inhibit-message t)) + (shell-command "brightnessctl set +5% 1> /dev/null")))) (exwm-input-set-key (kbd "s-<SPC>") (lambda (cmd) ;; s-&: Launch application. (interactive (list (read-shell-command "$ "))) @@ -213,6 +219,8 @@ (use-package frame :config + (setq-default window-divider-default-bottom-width 2 + window-divider-default-places t) (window-divider-mode)) (use-package files @@ -757,7 +765,7 @@ ;; Enables notifications for org :init (setq appt-message-warning-time 15 - appt-display-interval 10 + appt-display-interval 5 appt-disp-window-function (lambda (remaining new-time msg) (notifications-notify :title (message "In %s minutes" remaining) @@ -766,7 +774,8 @@ (advice-add 'appt-check :before (lambda (&rest args) - (org-agenda-to-appt t))) + (let ((inhibit-message t)) + (org-agenda-to-appt t)))) (appt-activate t)) (use-package rec-mode |