Index: openacs-4/packages/calendar-portlet/tcl/calendar-portlet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/tcl/calendar-portlet-procs.tcl,v
diff -u -N -r1.30 -r1.31
--- openacs-4/packages/calendar-portlet/tcl/calendar-portlet-procs.tcl	24 May 2002 01:58:44 -0000	1.30
+++ openacs-4/packages/calendar-portlet/tcl/calendar-portlet-procs.tcl	3 Jun 2002 07:06:49 -0000	1.31
@@ -78,6 +78,11 @@
             ]
         }
 
+        set extra_params ""
+        if {![empty_string_p $scoped_p]} {
+            set extra_params [list scoped_p $scoped_p]
+        }
+        
         return [portal::add_element_parameters \
                     -portal_id $portal_id \
                     -page_name $page_name \
@@ -87,7 +92,7 @@
                     -key calendar_id \
                     -value $calendar_id \
                     -param_action $param_action \
-                    -extra_params [list "scoped_p" $scoped_p]
+                    -extra_params $extra_params
         ]
     }