Index: openacs-4/packages/evaluation/tcl/apm-callback-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation/tcl/apm-callback-procs.tcl,v diff -u -r1.8.2.1 -r1.8.2.2 --- openacs-4/packages/evaluation/tcl/apm-callback-procs.tcl 17 Nov 2004 23:58:17 -0000 1.8.2.1 +++ openacs-4/packages/evaluation/tcl/apm-callback-procs.tcl 8 Jun 2005 22:07:45 -0000 1.8.2.2 @@ -91,3 +91,30 @@ delete_contents -package_id $package_id } +ad_proc -public evaluation::apm::after_upgrade { + {-from_version_name:required} + {-to_version_name:required} +} { + + +} { + apm_upgrade_logic \ + -from_version_name $from_version_name \ + -to_version_name $to_version_name \ + -spec { + 0.4d3 0.4d4 { + evaluation::set_points + } + 0.4d4 0.4d5 { + evaluation::set_perfect_score + } + 0.4d5 0.4d6 { + evaluation::set_relative_weight + } + 0.4d7 0.4d8 { + evaluation::set_forums_related + } + + + } +}