diff --git a/modules/radix/packages.scm b/modules/radix/packages.scm
index 49b8f5f..74cc1e5 100644
--- a/modules/radix/packages.scm
+++ b/modules/radix/packages.scm
@@ -1,10 +1,12 @@
 (define-module (radix packages)
+  #:use-module (gnu packages)
   #:use-module (radix combinators)
   #:export (%patch-path))
 
 (define %patch-path
-  (map (partial (flip string-append)
-                "/radix/packages/patches")
-       (filter (partial string-suffix? 
-                        "/guix/current/share/guile/site/3.0")
-               %load-path)))
+  (and=> (search-path %load-path "radix/packages.scm")
+         (compose list
+                  (partial (flip string-append)
+                           "/radix/packages/patches")
+                  dirname
+                  dirname)))