Index: openacs-4/packages/acs-tcl/tcl/apm-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/apm-procs.tcl,v
diff -u -r1.114.2.24 -r1.114.2.25
--- openacs-4/packages/acs-tcl/tcl/apm-procs.tcl	1 Dec 2020 09:27:11 -0000	1.114.2.24
+++ openacs-4/packages/acs-tcl/tcl/apm-procs.tcl	1 Feb 2021 10:51:08 -0000	1.114.2.25
@@ -956,7 +956,7 @@
     Returns a CVS release tag for a particular package key and version name.
 
 } {
-    regsub -all {\.} [string toupper "$package_key-$version_name"] "-" release_tag
+    regsub -all -- {\.} [string toupper "$package_key-$version_name"] "-" release_tag
     return $release_tag
 }
 
@@ -1485,7 +1485,7 @@
 } {
     set procedure_name [string tolower "[string trim $package_key]_post_instantiation"]
     # Change all "-" to "_" to mimic our Tcl standards
-    regsub -all {\-} $procedure_name "_" procedure_name
+    regsub -all -- {\-} $procedure_name "_" procedure_name
     if { [namespace which ::$procedure_name] eq "" } {
         # No such procedure exists...
         return ""