From fa3918b7aafaff2d38f233bcac3e75d30988b69c Mon Sep 17 00:00:00 2001 From: Christophe Rhodes <csr21@cantab.net> Date: Mon, 11 Mar 2002 19:15:06 +0000 Subject: [PATCH] remove :class option from reinitialize-instance call --- asdf.lisp | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/asdf.lisp b/asdf.lisp index b0cc767c..c05b4d8e 100644 --- a/asdf.lisp +++ b/asdf.lisp @@ -617,7 +617,7 @@ Returns the new tree (which probably shares structure with the old one)" ;; remove-keys form. important to keep them in sync components pathname default-component-class perform explain output-files operation-done-p - depends-on serialize in-order-to + depends-on serialize in-order-to class ;; list ends &allow-other-keys) options (declare (ignore serialize)) @@ -625,7 +625,9 @@ Returns the new tree (which probably shares structure with the old one)" (let* ((other-args (remove-keys '(components pathname default-component-class perform explain output-files operation-done-p - depends-on serialize in-order-to) + depends-on serialize in-order-to + ;; XXX I seem to need this + class) rest)) (ret (or (find-component parent name) -- GitLab