summary refs log tree commit diff stats
path: root/lisp
diff options
context:
space:
mode:
authorCase Duckworth2021-03-25 12:02:28 -0500
committerCase Duckworth2021-03-25 12:03:14 -0500
commit46f53399d54cb05fe140e0821278cc5c4fca1c09 (patch)
tree996bcb5cb82d526060ee62a42be579ad92a0d874 /lisp
parentTruncate lines (diff)
downloademacs-46f53399d54cb05fe140e0821278cc5c4fca1c09.tar.gz
emacs-46f53399d54cb05fe140e0821278cc5c4fca1c09.zip
Require `acdw' in `early-init.el'
Diffstat (limited to 'lisp')
-rw-r--r--lisp/acdw.el6
1 files changed, 6 insertions, 0 deletions
diff --git a/lisp/acdw.el b/lisp/acdw.el index f454570..4493275 100644 --- a/lisp/acdw.el +++ b/lisp/acdw.el
@@ -21,6 +21,12 @@
21 21
22;;; Utilities 22;;; Utilities
23 23
24(defconst acdw/system (pcase system-type
25 ('gnu/linux :home)
26 ((or 'msdos 'windows-nt) :work)
27 (_ :other))
28 "Which system is currently being used.")
29
24(defun acdw/when-unfocused (func &rest args) 30(defun acdw/when-unfocused (func &rest args)
25 "Call FUNC, with ARGS, iff all Emacs frames are out of focus. 31 "Call FUNC, with ARGS, iff all Emacs frames are out of focus.
26 32