From 95ecb1959f1230a48388b6a0a63f38c0ceaa98ab Mon Sep 17 00:00:00 2001 From: "Christopher R. Nelson" Date: Sat, 13 May 2023 13:44:17 -0400 Subject: update search-patch to be public? --- crn/packages.scm | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/crn/packages.scm b/crn/packages.scm index 1d5f6f0..3fd61df 100644 --- a/crn/packages.scm +++ b/crn/packages.scm @@ -27,9 +27,10 @@ (define (crn/search-patch file-name) "Search the patch FILE-NAME. Raise an error if not found." - (or (search-path (%patch-path) file-name) - (raise (formatted-message (G_ "~a: patch not found") - file-name)))) + (search-path (%patch-path) file-name) + ;; (or (search-path (%patch-path) file-name) + ;; (raise (formatted-message (G_ "~a: patch not found") + ;; file-name)))) (define-syntax-rule (crn/search-patches file-name ...) "Return the list of absolute file names corresponding to each -- cgit v1.2.3