Leo Famulari <l...@famulari.name> writes: > On Mon, Jul 25, 2016 at 11:47:51AM +0000, ng0 wrote: >> (with-fluids ((%default-port-encoding #f)) >> (substitute* (find-files "tests" "\\.c$") >> (("(system *\\(\")(/[^ ]*)" all pre prog-path) >> (let* ((base (basename prog-path)) >> - (prog (which (if (string=? base "gpg") "gpg2" >> base)))) >> + (prog (which base))) >> (string-append pre >> (or prog (error "not found: " >> base)))))))))))) > > I can confirm this fixes the build failure. But, I don't fully > understand the code that was changed. Can somebody double-check it?
The patch looks good to me. Thanks! Mark