Index: openacs-4/packages/faq-portlet/tcl/test/faq-portlet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/faq-portlet/tcl/test/faq-portlet-procs.tcl,v
diff -u -r1.4.2.6 -r1.4.2.7
--- openacs-4/packages/faq-portlet/tcl/test/faq-portlet-procs.tcl	9 Sep 2022 13:03:10 -0000	1.4.2.6
+++ openacs-4/packages/faq-portlet/tcl/test/faq-portlet-procs.tcl	30 Mar 2023 15:37:49 -0000	1.4.2.7
@@ -5,6 +5,45 @@
 
 }
 
+aa_register_case -procs {
+    faq_admin_portlet::show
+    faq_portlet::show
+} -cats {
+    api
+    smoke
+} render_portlet {
+    Test the rendering of the portlets
+} {
+    aa_run_with_teardown -rollback -test_code {
+        set package_id [site_node::instantiate_and_mount \
+                            -package_key faq \
+                            -node_name __test_faq_portlet]
+
+        set cf [list \
+                    package_id $package_id \
+                    shaded_p false \
+                   ]
+
+        foreach portlet {faq_admin_portlet faq_portlet} {
+            aa_section $portlet
+
+            set portlet [acs_sc::invoke \
+                             -contract portal_datasource \
+                             -operation Show \
+                             -impl $portlet \
+                             -call_args [list $cf]]
+
+            aa_log "Portlet returns: [ns_quotehtml $portlet]"
+
+            aa_false "No error was returned" {
+                [string first "Error in include template" $portlet] >= 0
+            }
+
+            aa_true "Portlet looks like HTML" [ad_looks_like_html_p $portlet]
+        }
+    }
+}
+
 aa_register_case -cats {web smoke} -libraries tclwebtest  tclwebtest_new_faq_portlet {
 
     Testing the creation a Faq from the portlet.