Various tweaks & clean up

core/autoload/debug.el

@@ -6,8 +6,8 @@
   (interactive "d")
   (let ((hl-line-p (bound-and-true-p hl-line-mode)))
     (if hl-line-p (hl-line-mode -1))
-    (let ((face (or (get-char-property (point) 'read-face-name)
-                    (get-char-property (point) 'face))))
+    (let ((face (or (get-char-property pos 'read-face-name)
+                    (get-char-property pos 'face))))
       (if face (message "Face: %s" face) (message "No face at %d" pos)))
     (if hl-line-p (hl-line-mode 1))))
 

core/core-packages.el

@@ -299,9 +299,9 @@ throw an error if the file doesn't exist."
                              ((stringp path) path)
                              ((listp path) (eval path))))
                   (and load-file-name   (file-name-directory load-file-name))
-                  (and buffer-file-name (file-name-directory buffer-file-name))
                   (and (bound-and-true-p byte-compile-current-file)
-                       (file-name-directory byte-compile-current-file)))))
+                       (file-name-directory byte-compile-current-file))
+                  (and buffer-file-name (file-name-directory buffer-file-name)))))
     (unless path
       (error "Could not find %s" filesym))
     (let ((file (expand-file-name (concat (symbol-name filesym) ".el") path)))

core/core-popups.el

@@ -87,7 +87,8 @@ is enabled/disabled.'")
   :config
   (if (display-graphic-p)
       (shackle-mode +1)
-    (add-transient-hook! 'after-make-frame-functions (shackle-mode +1)))
+    (add-transient-hook! 'after-make-frame-functions (shackle-mode +1))
+    (add-hook 'after-init-hook 'shackle-mode))
 
   (defun doom*shackle-always-align (plist)
     "Ensure popups are always aligned and selected by default. Eliminates the need

modules/ui/doom-modeline/config.el

@@ -154,7 +154,8 @@
   "Face for warnings in the modeline. Used by `*flycheck'"
   :group '+doom-modeline)
 
-(defface doom-modeline-urgent `((t (:inherit error)))
+(defface doom-modeline-urgent
+  `((t (:inherit error)))
   "Face for errors in the modeline. Used by `*flycheck'"
   :group '+doom-modeline)
 

modules/ui/doom/config.el

@@ -32,7 +32,7 @@
 ;; The native border "consumes" a pixel of the fringe on righter-most splits,
 ;; `window-divider' does not. Available since Emacs 25.1.
 (setq window-divider-default-places t
-      window-divider-default-bottom-width 1
+      window-divider-default-bottom-width 0
       window-divider-default-right-width 1)
 (window-divider-mode +1)