Index: openacs-4/packages/acs-tcl/tcl/apm-xml-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/apm-xml-procs.tcl,v
diff -u -r1.12 -r1.13
--- openacs-4/packages/acs-tcl/tcl/apm-xml-procs.tcl	23 Jan 2003 17:55:24 -0000	1.12
+++ openacs-4/packages/acs-tcl/tcl/apm-xml-procs.tcl	27 Jan 2003 10:45:23 -0000	1.13
@@ -102,6 +102,7 @@
     db_1row package_version_select {}
 
     apm_log APMDebug "APM: Writing Package Specification for $pretty_name $version_name"
+    set auto_mount_tag [ad_decode $auto_mount "" "" "<auto-mount>$auto_mount</auto-mount>\n"]
     append spec "<?xml version=\"1.0\"?>
 <!-- Generated by the OpenACS Package Manager -->
 
@@ -110,7 +111,7 @@
     <pretty-plural>[ad_quotehtml $pretty_plural]</pretty-plural>
     <initial-install-p>$initial_install_p</initial-install-p>
     <singleton-p>$singleton_p</singleton-p>
-
+    ${auto_mount_tag}
     <version name=\"$version_name\" url=\"[ad_quotehtml $version_uri]\">
     <database-support>\n"
 
@@ -239,6 +240,7 @@
     <code>pretty-plural</code>
     <code>initial-install-p</code>
     <code>singleton-p</code>
+    <code>auto-mount</code>
     <code>name</code> (the version name, e.g., <code>3.3a1</code>,
     <code>url</code> (the version URL),
     <code>package-name</code>,
@@ -317,6 +319,7 @@
     set properties(package-name) [apm_tag_value $package package-name]
     set properties(initial-install-p) [apm_tag_value -default "f" $package initial-install-p]
     set properties(singleton-p) [apm_tag_value -default "f" $package singleton-p]
+    set properties(auto-mount) [apm_tag_value -default "" $package auto-mount]
     set properties(pretty-plural) [apm_tag_value -default "$properties(package-name)s" $package pretty-plural]