Index: openacs-4/packages/dotlrn-homework/tcl/test/dotlrn-homework-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/tcl/test/dotlrn-homework-procs.tcl,v diff -u -r1.4.2.2 -r1.4.2.3 --- openacs-4/packages/dotlrn-homework/tcl/test/dotlrn-homework-procs.tcl 19 Aug 2020 17:34:29 -0000 1.4.2.2 +++ openacs-4/packages/dotlrn-homework/tcl/test/dotlrn-homework-procs.tcl 21 Aug 2020 18:01:11 -0000 1.4.2.3 @@ -68,14 +68,20 @@ aa_register_case -procs { dotlrn_homework_admin_portlet::link dotlrn_homework_portlet::link + dotlrn_homework_admin_portlet::get_pretty_name + dotlrn_homework_applet::get_pretty_name + dotlrn_homework_portlet::get_pretty_name } -cats { api production_safe - } dotlrn_homework_portlet_links { - Test diverse link procs. + } dotlrn_homework_portlet_links_names { + Test diverse link and name procs. } { - aa_equals "dotLRN homework admin portlet link" "[dotlrn_homework_admin_portlet::link]" "" - aa_equals "dotLRN homework portlet link" "[dotlrn_homework_portlet::link]" "" + aa_equals "dotLRN homework admin portlet link" "[dotlrn_homework_admin_portlet::link]" "" + aa_equals "dotLRN homework portlet link" "[dotlrn_homework_portlet::link]" "" + aa_equals "dotLRN homework admin portlet pretty name" "[dotlrn_homework_admin_portlet::get_pretty_name]" "#dotlrn-homework.homework_pretty_admin#" + aa_equals "dotLRN homework applet pretty name" "[dotlrn_homework_applet::get_pretty_name]" "[_ dotlrn-homework.pretty_name]" + aa_equals "dotLRN homework portlet pretty name" "[dotlrn_homework_portlet::get_pretty_name]" "#dotlrn-homework.pretty_name#" } aa_register_case -procs {