about summary refs log tree commit diff stats
path: root/lisp
diff options
context:
space:
mode:
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