1 files changed, 3 insertions(+), 3 deletions(-)

M modules/ruthless/utils.scm

@@ 1,7 1,7 @@
 (define-module (ruthless utils)
   #:use-module (gnu packages)
   #:use-module (ice-9 match)
-  #:export (ruthless-search-pathes))
+  #:export (ruthless-search-patches))
 
 (define %ruthless-patch-path
   (and=> (search-path %load-path "ruther/packages")


@@ 9,6 9,6 @@
            (list (string-append dir
                                 "/patches")))))
 
-(define* (ruthless-search-patches #:rest args)
+(define-syntax-rule (ruthless-search-patches file-name ...)
   (parameterize ((%patch-path %ruthless-patch-path))
-    (apply search-patches args)))
+    (list (search-patch file-name) ...)))