Index: openacs-4/packages/project-manager/lib/projects.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/project-manager/lib/projects.tcl,v diff -u -r1.11 -r1.12 --- openacs-4/packages/project-manager/lib/projects.tcl 10 Aug 2005 17:20:24 -0000 1.11 +++ openacs-4/packages/project-manager/lib/projects.tcl 10 Aug 2005 19:32:36 -0000 1.12 @@ -7,7 +7,7 @@ set required_param_list [list package_id] set optional_param_list [list orderby status_id searchterm bulk_p action_p filter_p base_url customer_id end_date_f] -set optional_unset_list [list assignee_id] +set optional_unset_list [list assignee_id date_range] foreach required_param $required_param_list { if {![info exists $required_param]} { @@ -128,7 +128,7 @@ ############################################## # Filter for planned_end_date -if { ![empty_string_p $date_range] } { +if {[exists_and_not_null date_range] } { set start_range_f [lindex [split $date_range "/"] 0] set end_range_f [lindex [split $date_range "/"] 1] if {![empty_string_p $start_range_f] && ![empty_string_p $end_range_f]} {