Index: openacs-4/packages/oct-election/www/election-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/oct-election/www/election-edit.tcl,v diff -u -N -r1.2.2.1 -r1.2.2.2 --- openacs-4/packages/oct-election/www/election-edit.tcl 7 Nov 2005 19:51:49 -0000 1.2.2.1 +++ openacs-4/packages/oct-election/www/election-edit.tcl 17 Nov 2006 15:10:29 -0000 1.2.2.2 @@ -15,6 +15,7 @@ {start_time:text {label "Start Time (2005-04-01 10:00PST)"}} {end_time:text {label "End Time"}} {vote_forum_cutoff:text {label "Forum Posting cutoff date (2005-04-01 10:00PST)"}} + {cvs_history_days:text {label "Number of days for checking Commit History"}} {number_of_candidates:integer {label "Number of Candidates"}} } -new_request { auth::require_login @@ -31,6 +32,7 @@ end_time, label, vote_forum_cutoff, + cvs_history_days, number_of_candidates from oct_election where election_id = :election_id; @@ -40,17 +42,18 @@ } -new_data { db_dml create_election { insert into oct_election - (start_time, end_time, number_of_candidates, vote_forum_cutoff, label) - values (:start_time, :end_time, :number_of_candidates, :vote_forum_cutoff, :label); + (start_time, end_time, number_of_candidates, vote_forum_cutoff, label, cvs_history_days) + values (:start_time, :end_time, :number_of_candidates, :vote_forum_cutoff, :label, :cvs_history_days); } } -edit_data { db_dml update_election { update oct_election set start_time = :start_time, end_time = :end_time, vote_forum_cutoff = :vote_forum_cutoff, + cvs_history_days = :cvs_history_days, number_of_candidates = :number_of_candidates, - label = :label + label = :label where election_id = :election_id} ad_returnredirect [export_vars -base election {election_id}] }