Oops, for-all?'s arguments are "backward".

diff --git a/src/cref/butils.scm b/src/cref/butils.scm
index f90d0b87b351077066cfd13e4491ec4fd19a3559..5110da15139d594c9063e47a1189a463ffbea682 100644 (file)
--- a/src/cref/butils.scm
+++ b/src/cref/butils.scm
@@ -70,7 +70,7 @@ USA.
            (if entry (cdr entry) '())))
 
        (for-each (lambda (file.deps)
-                   (if (not (for-all? string? file.deps))
+                   (if (not (for-all? file.deps string?))
                        (error "Bogus dependency:" file.deps)))
                  dependencies)