summaryrefslogtreecommitdiff
path: root/home
diff options
context:
space:
mode:
authorMarc Coquand <marc@mccd.space>2024-11-02 21:00:53 +0200
committerMarc Coquand <marc@mccd.space>2024-11-02 21:00:53 +0200
commit21d9cfaee14110e95c4385dccead33a9dc9d9423 (patch)
treeac9689be5edd35eb73b18e93c504fd4ddbc47cf4 /home
parentbc989cad9db883914868470347bf1a0fd0e5f7bd (diff)
downloadguix-21d9cfaee14110e95c4385dccead33a9dc9d9423.tar.gz
guix-21d9cfaee14110e95c4385dccead33a9dc9d9423.tar.bz2
guix-21d9cfaee14110e95c4385dccead33a9dc9d9423.zip
.
Diffstat (limited to 'home')
-rw-r--r--home/dots/.emacs23
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