diff --git a/lisp/install-allegro.lisp b/lisp/install-allegro.lisp
index 2d42942..7f15e14 100644
--- a/lisp/install-allegro.lisp
+++ b/lisp/install-allegro.lisp
@@ -13,7 +13,7 @@
                               (version (getf argv :version)))
   (let ((os (intern uname :keyword))
         (machine (intern uname-m :keyword)))
-    (cond ((find version '("11.0bexpress"
+    (cond ((find version '("11.0express"
                            "10.1express")
                  :test 'equal)
            (format nil "~@{~A~}"
diff --git a/lisp/locations.lisp b/lisp/locations.lisp
index 8e5167b..04192b1 100644
--- a/lisp/locations.lisp
+++ b/lisp/locations.lisp
@@ -54,7 +54,7 @@
 
 (export
  (defvar *allegro-agreement-uri*
-   '(#+darwin ("11.0bexpress" . "https://franz.com/ftp/pub/legal/ACL-Express-20170301.pdf")
+   '(#+darwin ("11.0express" . "https://franz.com/ftp/pub/legal/ACL-Express-20170301.pdf")
      ("10.1express" . #1="https://franz.com/ftp/pub/legal/ACL-Express-20170301.pdf")
      ("100express"  . #1#)
      ("101b"        . "http://franz.com/products/licensing/FSLA10.1.beta.pdf"))))