Index: openacs-4/packages/acs-bootstrap-installer/installer/install.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-bootstrap-installer/installer/install.tcl,v
diff -u -r1.13 -r1.14
--- openacs-4/packages/acs-bootstrap-installer/installer/install.tcl	7 Aug 2017 23:47:46 -0000	1.13
+++ openacs-4/packages/acs-bootstrap-installer/installer/install.tcl	3 Sep 2024 15:37:30 -0000	1.14
@@ -84,7 +84,7 @@
     #   set user_id $creation_info(user_id)
     # }
 
-    # .. so use the low level helper
+    # .. so use the low-level helper
     set user_id [auth::create_local_account_helper \
     		     $email \
     		     $first_names \
@@ -111,7 +111,7 @@
     # stub util_memoize_flush...
     rename util_memoize_flush util_memoize_flush_saved
     proc util_memoize_flush {args} {}
-    permission::grant -party_id $user_id -object_id [acs_lookup_magic_object security_context_root] -privilege "admin"
+    permission::grant -party_id $user_id -object_id [acs_magic_object security_context_root] -privilege "admin"
     # nuke stub 
     rename util_memoize_flush {}
     rename util_memoize_flush_saved util_memoize_flush
@@ -146,7 +146,7 @@
 #############
 
 ns_write "<p>Generating secret tokens..."
-populate_secret_tokens_db
+sec_populate_secret_tokens_db
 ns_write "  <p>Done.<p>"
 
 ##############