From 38a8af31409a4feb93e492a2d8c3911d7a1e45d9 Mon Sep 17 00:00:00 2001
From: Francois-Rene Rideau <tunes@google.com>
Date: Sat, 15 Mar 2014 23:08:29 -0400
Subject: [PATCH] Fix load-fasl-op to use prepare-fasl-op, not prepare-op
 (which would defeat the purpose).

---
 bundle.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/bundle.lisp b/bundle.lisp
index fe020bf3..2ab25604 100644
--- a/bundle.lisp
+++ b/bundle.lisp
@@ -87,7 +87,7 @@ itself.")) ;; operation on a system and its dependencies
     ((selfward-operation :initform '(prepare-fasl-op #+ecl lib-op) :allocation :class)))
 
   (defclass load-fasl-op (basic-load-op selfward-operation)
-    ((selfward-operation :initform '(prepare-op fasl-op) :allocation :class)))
+    ((selfward-operation :initform '(prepare-fasl-op fasl-op) :allocation :class)))
 
   ;; NB: since the monolithic-op's can't be sideway-operation's,
   ;; if we wanted lib-op, dll-op, deliver-asd-op to be sideway-operation's,
-- 
GitLab