added bools for system identifications (will replace me/whoami)

init.org

@@ -88,7 +88,13 @@
   :ID:       00b48602-2a95-492e-a90b-c1e3a94c1ecb
   :END:
 #+BEGIN_SRC emacs-lisp
-  (defvar me/whoami
+(setq *home_desktop* (string-equal (system-name) "marc")
+      ,*home_laptop* (string-equal (system-name) "laptop")
+      ,*work_local* (string-equal (system-name) "PMPCNEU08")
+      ,*work_remote* (string-equal (system-name) "PMTS01"))
+
+
+(defvar me/whoami
     (if (string-equal (system-name) "PMTS01")
 	"work_remote"
       (if (string-equal (system-name) "laptop")