minor improvement

init/dot.emacs.el

@@ -16,11 +16,11 @@
 (setq emacs-config-name emacs-start-kit)
 
 (setq emacs-config-directory
-  (let ((config-dir (getenv "EMACS_CONFIG_DIR")))
-    (if config-dir
-        (concat config-dir "/" emacs-config-name "/")
-      (concat (substitute-in-file-name "~/.config/emacs/")
-              emacs-config-name "/"))))
+      (let ((config-dir (getenv "EMACS_CONFIG_DIR")))
+        (if config-dir
+            (concat config-dir "/" emacs-config-name "/")
+          (concat (substitute-in-file-name "~/.config/emacs/")
+                  emacs-config-name "/"))))
 
 (unless (file-exists-p emacs-config-directory)
   (make-directory emacs-config-directory t))
@@ -30,12 +30,20 @@
 (setq emacs-init-file
       (expand-file-name "init.el" user-emacs-directory))
 
+;; setup customization directory for emacs (custom.el)
 (unless custom-file
   (setq custom-file (expand-file-name "custom.el" user-emacs-directory)))
 
-(setq package-user-dir 
+;; Setup default directory which package will be installed
+(setq package-user-dir
       (concat user-emacs-directory "/elpa"))
 
+;; setup directory of spacemacs customization
+(when (string= emacs-start-kit "spacemacs")
+  (let ((spacemacs-dir (concat emacs-config-directory "/.local/etc")))
+    (progn
+      (setenv "SPACEMACSDIR" spacemacs-dir))))
+
 (setq startkit-info
       '((doom-emacs .
                     (lambda (dir)
@@ -70,7 +78,8 @@
                       (concat "git clone https://github.com/syl20bnr/spacemacs.git " dir))))))
 
 (defun on-installer-finished (process event)
-  "Callback function when uinstaller process has finished."
+  "Callback function when uinstaller process has finished.
+We use this function to load startkit initialization file"
   (cond
    ((string= event "finished\n") (load-file emacs-init-file))
    (t (message "Event %s has been ignored" event))))