Pass obsolete path to fd, process-lines doesn't expand the tilde ~

wyuenho · Nov 26, 2024 · a7f278a · a7f278a
1 parent a0b091c
commit a7f278a
Showing 1 changed file with 1 addition and 3 deletions.
diff --git a/pet.el b/pet.el
@@ -203,9 +203,7 @@ Return absolute path to FILE if found, nil otherwise."
   (condition-case err
       (when-let ((root (pet-project-root)))
         (if (executable-find pet-fd-command)
-            (car (cl-remove-if
-                  #'string-empty-p
-                  (apply #'process-lines (append (list pet-fd-command) pet-fd-command-args (list file root)))))
+            (car (apply #'process-lines `(,pet-fd-command ,@pet-fd-command-args ,file ,(expand-file-name root))))
           (when-let ((fileset
                       (cond ((functionp 'projectile-dir-files)
                              (mapcar (apply-partially #'concat root)