Index: openacs-4/packages/dotlrn-faq/tcl/test/dotlrn-faq-test-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-faq/tcl/test/Attic/dotlrn-faq-test-procs.tcl,v
diff -u -r1.1.2.1 -r1.1.2.2
--- openacs-4/packages/dotlrn-faq/tcl/test/dotlrn-faq-test-procs.tcl	10 Sep 2019 09:20:40 -0000	1.1.2.1
+++ openacs-4/packages/dotlrn-faq/tcl/test/dotlrn-faq-test-procs.tcl	21 Aug 2020 18:18:26 -0000	1.1.2.2
@@ -26,6 +26,17 @@
     aa_equals "Applet key" "[dotlrn_faq::applet_key]" "dotlrn_faq"
 }
 
+aa_register_case -procs {
+        dotlrn_faq::get_pretty_name
+    } -cats {
+        api
+        production_safe
+    } news_portlet_names {
+        Test diverse name procs.
+} {
+    aa_equals "dotlrn-faq pretty name" "[dotlrn_faq::get_pretty_name]" "#faq.pretty_name#"
+}
+
 # Local variables:
 #    mode: tcl
 #    tcl-indent-level: 4