Index: openacs-4/packages/evaluation/www/admin/tasks/solution-add-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation/www/admin/tasks/solution-add-edit.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/evaluation/www/admin/tasks/solution-add-edit.tcl 28 Apr 2004 11:09:54 -0000 1.1 +++ openacs-4/packages/evaluation/www/admin/tasks/solution-add-edit.tcl 19 May 2004 17:33:09 -0000 1.2 @@ -7,17 +7,17 @@ @creation-date Mar 2004 @cvs-id $Id$ } { - task_id:integer,notnull - solution_id:integer,notnull,optional - item_id:integer,notnull,optional + task_id:integer,notnull + solution_id:integer,notnull,optional + item_id:integer,notnull,optional upload_file:trim,optional upload_file.tmpfile:tmpfile,optional - {solution_mode "edit"} - grade_id:integer,notnull + {solution_mode "edit"} + grade_id:integer,notnull + {return_url "/"} } set package_id [ad_conn package_id] -set return_url "../../task-list?[export_vars { grade_id }]" if { [ad_form_new_p -key solution_id] } { set page_title "Add Task Solution" @@ -217,7 +217,7 @@ } } - ad_returnredirect "[export_vars -base "../../task-list" { grade_id }]" + ad_returnredirect "$return_url" ad_script_abort }