cref: one more place must allow #f for a package's parent.
authorMatt Birkholz <matt@birkholz.chandler.az.us>
Wed, 24 Apr 2013 16:52:13 +0000 (09:52 -0700)
committerMatt Birkholz <matt@birkholz.chandler.az.us>
Wed, 24 Apr 2013 16:52:13 +0000 (09:52 -0700)
src/cref/redpkg.scm

index 2d8c2d4b1e2b2fdc5ff414344ef2c8bb100824ca..cf5ce5f06e954e668ece9a0374f44c36449a99eb 100644 (file)
@@ -313,7 +313,9 @@ USA.
                  (error "Ill-formed PARENT option:" option))
              (if (assq 'PARENT options)
                  (error "Multiple PARENT options."))
-             (values (parse-name (cadr option)) options))
+             (values (and (cadr option)
+                          (parse-name (cadr option)))
+                     options))
            (values 'NONE options)))
     (let ((package (make-package-description name parent)))
       (process-package-options package options)