Index: openacs-4/contrib/packages/general-comments/www/comment-add-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/general-comments/www/Attic/comment-add-edit.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/contrib/packages/general-comments/www/comment-add-edit.tcl 6 Jul 2003 02:12:37 -0000 1.2 +++ openacs-4/contrib/packages/general-comments/www/comment-add-edit.tcl 6 Jul 2003 12:56:35 -0000 1.3 @@ -3,21 +3,24 @@ ad_page_contract { Displays a form for adding a commment to a page + comment_id is optional for add + object_id is optional for edit + @author Phong Nguyen @author Pascal Scheffers (pascal@scheffers.net) @creation-date 2000-10-12 @cvs-id $Id$ } { - object_id:integer,notnull + object_id:integer,optional comment_id:integer,optional - { context_id "$object_id" } + { context_id "" } { title "" } { content "" } { object_name "" } { return_url "" } } -properties { page_title:onevalue -oops context:onevalue + context:onevalue target:onevalue title:onevalue content:onevalue @@ -35,6 +38,9 @@ # this works unless we allow the comment-add page to be included set package_id [ad_conn package_id] set is_live "t" + +# set context_id to object_id if we are adding + # if {![ad_form_new_p -key comment_id]} { # permission::require_permission -object_id $comment_id \ # -party_id $user_id \