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.7 -r1.8 --- openacs-4/packages/imsld/tcl/apm-callback-procs.tcl 12 Mar 2008 21:45:11 -0000 1.7 +++ openacs-4/packages/imsld/tcl/apm-callback-procs.tcl 4 Jul 2008 15:29:26 -0000 1.8 @@ -66,3 +66,29 @@ return 1 } + + +ad_proc -public imsld::apm_callback::after_upgrade { + -from_version_name:required + -to_version_name:required +} { + Upgrade script for the IMS-LD package + + @author Derick Leony (derick@inv.it.uc3m.es) + @creation-date 2008-06-16 + + @return + + @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)" + } + } +}