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.3 -r1.4
--- openacs-4/packages/dotlrn-homework/tcl/test/dotlrn-homework-procs.tcl	7 Aug 2017 23:48:10 -0000	1.3
+++ openacs-4/packages/dotlrn-homework/tcl/test/dotlrn-homework-procs.tcl	9 Jul 2018 15:53:19 -0000	1.4
@@ -26,6 +26,13 @@
 			set params([lindex $param 0]) [lindex $param 1]
 		    }
 
+                    # portal element parameters might report a
+                    # package_id of 0... this would make much things
+                    # fail afterwards
+                    if {[apm_package_key_from_id $params(package_id)] eq ""} {
+                        aa_log "Element $element_id not associated with a valid package -> \$params(package_id) = $params(package_id). Skipping this test."
+                        continue
+                    }
 
 		    set test_package_id [ad_conn package_id]
 		    set package_id [site_node::closest_ancestor_package -url [site_node::get_url_from_object_id -object_id $params(package_id)] -package_key dotlrn]