Index: openacs-4/packages/xotcl-core/tcl/06-package-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/06-package-procs.tcl,v
diff -u -r1.12 -r1.13
--- openacs-4/packages/xotcl-core/tcl/06-package-procs.tcl	1 Oct 2008 22:59:59 -0000	1.12
+++ openacs-4/packages/xotcl-core/tcl/06-package-procs.tcl	3 Oct 2008 12:45:01 -0000	1.13
@@ -145,11 +145,10 @@
       #my log "PKG: $package_class"
 
       if {$url ne ""} {
-        $package_class create ::$package_id -id $package_id -url $url
+        $package_class create ::$package_id -destroy_on_cleanup -id $package_id -url $url
       } else {
-        $package_class create ::$package_id -id $package_id
+        $package_class create ::$package_id -destroy_on_cleanup -id $package_id
       }
-      ::$package_id destroy_on_cleanup
     } else {
       if {$url ne ""} {
         ::$package_id set_url -url $url