Index: openacs-4/packages/imsld/tcl/apm-callback-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/tcl/apm-callback-procs.tcl,v diff -u -r1.13 -r1.14 --- openacs-4/packages/imsld/tcl/apm-callback-procs.tcl 8 Jul 2009 16:22:40 -0000 1.13 +++ openacs-4/packages/imsld/tcl/apm-callback-procs.tcl 14 Jan 2010 10:31:02 -0000 1.14 @@ -44,7 +44,7 @@ -node_id:required -package_id:required } { - task that must be done before unmount the imsld package + task that must be done before unmount the imsld package } { @@ -87,27 +87,27 @@ @error } { apm_upgrade_logic \ - -from_version_name $from_version_name \ - -to_version_name $to_version_name \ - -spec { - 1.3d 1.4d { - content::type::attribute::new -content_type imsld_complete_act \ - -attribute_name time_string -datatype string \ - -pretty_name "#imsld.Time_String#" -column_spec "varchar(30)" - } - 1.5d 1.6d { - content::type::attribute::new -content_type imsld_imsld \ - -attribute_name resource_handler -datatype string \ - -pretty_name "#imsld.Resource_Handler#" -column_spec "varchar(100)" - } - 1.7d 1.8d { - imsld::gsi::install::do_install - } - 2.0d 2.0 { - if { [imsld::global_folder_id] eq "" } { - imsld::install::create_global_folder - } - } - } + -from_version_name $from_version_name \ + -to_version_name $to_version_name \ + -spec { + 1.3d 1.4d { + content::type::attribute::new -content_type imsld_complete_act \ + -attribute_name time_string -datatype string \ + -pretty_name "#imsld.Time_String#" -column_spec "varchar(30)" + } + 1.5d 1.6d { + content::type::attribute::new -content_type imsld_imsld \ + -attribute_name resource_handler -datatype string \ + -pretty_name "#imsld.Resource_Handler#" -column_spec "varchar(100)" + } + 1.7d 1.8d { + imsld::gsi::install::do_install + } + 2.0d 2.0 { + if { [imsld::global_folder_id] eq "" } { + imsld::install::create_global_folder + } + } + } }