add function/variable flag for 'dayJob' environment

2023-04-11 09:59:36 -04:00 · 2023-04-11 09:59:36 -04:00 · 9046f48acc
parent 7aa4aa9ce6
commit 9046f48acc
1 changed files with 6 additions and 1 deletions
--- a/common/_global.el
+++ b/common/_global.el
@ -15,8 +15,13 @@
 ; helper functions
 (require 'subr-x)
 (setq kmn/is-termux
-      (string-suffix-p "Android" (string-trim (shell-command-to-string "uname -a"))))
+  (string-suffix-p "Android" (string-trim (shell-command-to-string "uname -a"))))

+(setq kmn/dayjob-search-string "pce")
+(setq kmn/is-dayjob
+  (compare-strings kmn/dayjob-search-string nil nil (getenv "USERDOMAIN") nil nil t)
+)
+ 
 ; ensure elisp plugins are compiled
 (require 'dash)
 (require 'f)