Index: openacs-4/packages/tasks/lib/portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/tasks/lib/portlet.tcl,v
diff -u -N
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/tasks/lib/portlet.tcl	30 Nov 2005 16:06:52 -0000	1.1.2.2
@@ -0,0 +1,19 @@
+# packages/contacts/lib/portlet.tcl
+#
+# Portlet wrapper
+#
+# @author Malte Sussdorff (sussdorff@sussdorff.de)
+# @creation-date 2005-05-01
+# @arch-tag: c3461fd0-cb54-49bf-947a-8f710b3bd016
+# @cvs-id $Id: portlet.tcl,v 1.1.2.2 2005/11/30 16:06:52 miguelm Exp $
+
+foreach required_param {portlet_title} {
+    if {![info exists $required_param]} {
+	return -code error "$required_param is a required parameter."
+    }
+}
+foreach optional_param {} {
+    if {![info exists $optional_param]} {
+	set $optional_param {}
+    }
+}