refine

junjiemars · Feb 9, 2025 · e2623dc · e2623dc
1 parent 810600a
commit e2623dc
Showing 1 changed file with 8 additions and 8 deletions.
diff --git a/config/fn.el b/config/fn.el
@@ -588,14 +588,14 @@ Call FN with the path if FN is non-nil."
 (defun path+ (root &rest path)
   "Append a list of PATH to ROOT."
   (declare (indent 1))
-  (and root
-       (unless (strrchr root ?/) (setq root (concat root "/")))
-       (cond ((null path) (if (strrchr root ?/) root (concat root "/")))
-             (t (apply #'path+
-                       (concat root (if (strrchr (car path) ?/)
-                                        (car path)
-                                      (concat (car path) "/")))
-                       (cdr path))))))
+  (when root
+    (unless (strrchr root ?/) (setq root (concat root "/")))
+    (cond ((null path) (if (strrchr root ?/) root (concat root "/")))
+          (t (apply #'path+
+                    (concat root (if (strrchr (car path) ?/)
+                                     (car path)
+                                   (concat (car path) "/")))
+                    (cdr path))))))
 
 (defun path- (file)
   "Return the parent path of FILE."