From 46f53399d54cb05fe140e0821278cc5c4fca1c09 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Thu, 25 Mar 2021 12:02:28 -0500
Subject: Require `acdw' in `early-init.el'

---
 lisp/acdw.el | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'lisp/acdw.el')

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 @@
 
 ;;; Utilities
 
+(defconst acdw/system (pcase system-type
+            ('gnu/linux :home)
+            ((or 'msdos 'windows-nt) :work)
+            (_ :other))
+  "Which system is currently being used.")
+
 (defun acdw/when-unfocused (func &rest args)
   "Call FUNC, with ARGS, iff all Emacs frames are out of focus.
 
-- 
cgit 1.4.1-21-gabe81