diff --git a/allegro-variants.lisp b/allegro-variants.lisp
index 940480c52535a06cc9362d0abb24127a878b26e6..80b97869f1e19cc8ca20923d7702fdde008ee4f2 100644
--- a/allegro-variants.lisp
+++ b/allegro-variants.lisp
@@ -36,11 +36,11 @@ REGISTER-LISP-IMPLEMENTATION."
               :for allegro-variant = (conc-keyword :allegro casename charname bitsname smpname)
               :for fullname = (strcat "Allegro CL"
                                       casefullname charfullname bitsfullname smpfullname)
-              :for executable = (format nil "~(~alisp~a~)" caseexe charname) :do
+              :for executable = (format nil "~(~alisp~a~)" caseexe charname)
               :for (exepath imgpath) = (if windowsp
                                            (list (subpathname dir (if (emptyp charfullname) "buildi.exe" "build.exe"))
                                                  (subpathname dir executable :type "dxl"))
-                                           (list (subpathname dir executable) nil))
+                                           (list (subpathname dir executable) nil)) :do
                 (c `(,allegro-variant
                      :fullname ,fullname
                      :name ,(native-namestring exepath)
diff --git a/lisp-invocation.asd b/lisp-invocation.asd
index 60ab0ce2c6ff559fe3d1ead624bc471824f631c8..f7543b2a4d9f936d21ffdf028ab481a89f825aa5 100644
--- a/lisp-invocation.asd
+++ b/lisp-invocation.asd
@@ -13,7 +13,7 @@
   (error "ASDF 3.1.2 required"))
 
 (defsystem "lisp-invocation"
-  :version "1.0.10"
+  :version "1.0.11"
   :author ("Francois-Rene Rideau")
   :maintainer "Francois-Rene Rideau"
   :licence "MIT"