Skip to content
Snippets Groups Projects
Commit fa3918b7 authored by Christophe Rhodes's avatar Christophe Rhodes
Browse files

remove :class option from reinitialize-instance call

parent 1de45796
No related branches found
No related tags found
No related merge requests found
...@@ -617,7 +617,7 @@ Returns the new tree (which probably shares structure with the old one)" ...@@ -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 ;; remove-keys form. important to keep them in sync
components pathname default-component-class components pathname default-component-class
perform explain output-files operation-done-p perform explain output-files operation-done-p
depends-on serialize in-order-to depends-on serialize in-order-to class
;; list ends ;; list ends
&allow-other-keys) options &allow-other-keys) options
(declare (ignore serialize)) (declare (ignore serialize))
...@@ -625,7 +625,9 @@ Returns the new tree (which probably shares structure with the old one)" ...@@ -625,7 +625,9 @@ Returns the new tree (which probably shares structure with the old one)"
(let* ((other-args (remove-keys (let* ((other-args (remove-keys
'(components pathname default-component-class '(components pathname default-component-class
perform explain output-files operation-done-p 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)) rest))
(ret (ret
(or (find-component parent name) (or (find-component parent name)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment