Search for ASDF configuration files first in user directories, and then in
Guix profiles.

diff -ru a/asdf-3.3.4.lisp b/asdf-3.3.4.lisp
--- a/asdf-3.3.4.lisp	2020-02-14 20:16:22.000000000 +0100
+++ b/asdf-3.3.4.lisp	2020-12-05 11:09:56.066229482 +0100
@@ -12535,10 +12535,15 @@
     (find-preferred-file (system-config-pathnames *output-translations-file*)
                          :direction direction))
   (defun user-output-translations-directory-pathname (&key (direction :input))
-    (xdg-config-pathname *output-translations-directory* direction))
-  (defun system-output-translations-directory-pathname (&key (direction :input))
-    (find-preferred-file (system-config-pathnames *output-translations-directory*)
+    (find-preferred-file (list (xdg-config-home *output-translations-directory*))
                          :direction direction))
+  (defun system-output-translations-directory-pathname (&key (direction :input))
+    `(:output-translations
+      ,@(loop :for dir :in (filter-pathname-set
+                            (xdg-config-dirs
+                             "common-lisp/asdf-output-translations.conf.d/"))
+              :collect `(:include ,dir))
+      :inherit-configuration))
   (defun environment-output-translations ()
     (getenv "ASDF_OUTPUT_TRANSLATIONS"))
 
@@ -12921,10 +12926,15 @@
     (find-preferred-file (system-config-pathnames *source-registry-file*)
                          :direction direction))
   (defun user-source-registry-directory (&key (direction :input))
-    (xdg-config-pathname *source-registry-directory* direction))
-  (defun system-source-registry-directory (&key (direction :input))
-    (find-preferred-file (system-config-pathnames *source-registry-directory*)
+    (find-preferred-file (list (xdg-config-home *source-registry-directory*))
                          :direction direction))
+  (defun system-source-registry-directory (&key (direction :input))
+    `(:source-registry
+      ,@(loop :for dir :in (filter-pathname-set
+                            (xdg-config-dirs
+                             "common-lisp/source-registry.conf.d/"))
+              :collect `(:include ,dir))
+      :inherit-configuration))
   (defun environment-source-registry ()
     (getenv "CL_SOURCE_REGISTRY"))
 
id=0a5e626f106b569c6c087da38385fc020fe1defd'>packages</a>/<a href='/guix/log/gnu/packages/aux-files?id=0a5e626f106b569c6c087da38385fc020fe1defd'>aux-files</a>/<a href='/guix/log/gnu/packages/aux-files/guix.vim?id=0a5e626f106b569c6c087da38385fc020fe1defd'>guix.vim</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/gnu/packages/aux-files/guix.vim?id=0a5e626f106b569c6c087da38385fc020fe1defd&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2023-11-08 10:28:55 +0200'>2023-11-08</span></td><td><a href='/guix/commit/gnu/packages/aux-files/guix.vim?id=b17567d45c03b7125bfe0255f4ac45d5db81a268'>gnu: vim: Add vim packages to 'package-path' instead of 'runtime-path'.</a><span class='msg-avail'>...<span class='msg-tooltip'>    This is neccesary because vim's built-in plugin manager looks for directories
    under 'package-path' instead of 'runtime-path.' Once we have told vim the
    package-path, it adds all the packages to the runtime-path automatically for us.

* gnu/packages/aux-files/guix.vim: Add paths to packagepath instead of
runtimepath.  Remove code to adjust runtimepath after adding paths.

Signed-off-by: Efraim Flashner &lt;efraim@flashner.co.il&gt;
</span></span></td><td>Jonathan Scoresby</td></tr>