Menu
▾
▴
[Openinteract-commits] CVS: OpenInteract2/lib/OpenInteract2/Action CommonAdd.pm,1.19,1.20 CommonDisplay.pm,1.13,1.14 CommonRemove.pm,1.16,1.17 CommonSearch.pm,1.15,1.16 CommonUpdate.pm,1.18,1.19
|
From: Chris W. <la...@us...> - 2004-12-01 05:07:11
|
Update of /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2/Action In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14922/lib/OpenInteract2/Action Modified Files: CommonAdd.pm CommonDisplay.pm CommonRemove.pm CommonSearch.pm CommonUpdate.pm Log Message: add a 'c_task' action parameter to all common action tasks Index: CommonAdd.pm =================================================================== RCS file: /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2/Action/CommonAdd.pm,v retrieving revision 1.19 retrieving revision 1.20 diff -C2 -d -r1.19 -r1.20 *** CommonAdd.pm 25 Sep 2004 17:48:51 -0000 1.19 --- CommonAdd.pm 1 Dec 2004 05:07:02 -0000 1.20 *************** *** 14,17 **** --- 14,18 ---- sub display_add { my ( $self ) = @_; + $self->param( c_task => 'display_add' ); $self->_add_init_param; my $object_class = $self->param( 'c_object_class' ); *************** *** 36,39 **** --- 37,41 ---- sub add { my ( $self ) = @_; + $self->param( c_task => 'add' ); $self->_add_init_param; CTX->response->return_url( $self->param( 'c_add_return_url' ) ); *************** *** 187,191 **** SPOPS key for object you will be displaying. ! =head2 System-created B<c_object> ($) --- 189,197 ---- SPOPS key for object you will be displaying. ! =head2 System-created parameters ! ! B<c_task> ! ! Name of the task originally invoked: 'display_add'. B<c_object> ($) *************** *** 375,378 **** --- 381,388 ---- =head2 System-created parameters + B<c_task> + + Name of the task originally invoked: 'add'. + B<c_object> ($) Index: CommonDisplay.pm =================================================================== RCS file: /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2/Action/CommonDisplay.pm,v retrieving revision 1.13 retrieving revision 1.14 diff -C2 -d -r1.13 -r1.14 *** CommonDisplay.pm 8 Nov 2004 14:33:28 -0000 1.13 --- CommonDisplay.pm 1 Dec 2004 05:07:02 -0000 1.14 *************** *** 13,16 **** --- 13,17 ---- sub display { my ( $self ) = @_; + $self->param( c_task => 'display' ); $self->_display_init_param; *************** *** 161,164 **** --- 162,169 ---- =head2 System-created parameters + B<c_task> + + Name of the task originally invoked: 'display'. + B<c_object_class> ($) Index: CommonRemove.pm =================================================================== RCS file: /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2/Action/CommonRemove.pm,v retrieving revision 1.16 retrieving revision 1.17 diff -C2 -d -r1.16 -r1.17 *** CommonRemove.pm 25 Sep 2004 17:48:51 -0000 1.16 --- CommonRemove.pm 1 Dec 2004 05:07:02 -0000 1.17 *************** *** 14,17 **** --- 14,18 ---- sub remove { my ( $self ) = @_; + $self->param( c_task => 'remove' ); $self->_remove_init_param; $log ||= get_logger( LOG_ACTION ); *************** *** 205,208 **** --- 206,213 ---- =head2 System-created parameters + B<c_task> + + Name of the task originally invoked: 'remove'. + B<c_object_class> Index: CommonSearch.pm =================================================================== RCS file: /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2/Action/CommonSearch.pm,v retrieving revision 1.15 retrieving revision 1.16 diff -C2 -d -r1.15 -r1.16 *** CommonSearch.pm 5 Oct 2004 03:08:25 -0000 1.15 --- CommonSearch.pm 1 Dec 2004 05:07:02 -0000 1.16 *************** *** 20,23 **** --- 20,24 ---- sub search_form { my ( $self ) = @_; + $self->param( c_task => 'search_form' ); $self->_search_form_init_param; my %tmpl_params = (); *************** *** 46,49 **** --- 47,51 ---- sub search { my ( $self ) = @_; + $self->param( c_task => 'search' ); $self->_search_init_param; $log ||= get_logger( LOG_ACTION ); *************** *** 547,550 **** --- 549,561 ---- above. + =head2 System-created parameters + + These are created by the task and available in any callbacks or from + the view. + + B<c_task> + + Name of the task originally invoked: 'search_form'. + =head1 DESCRIPTION FOR 'search' *************** *** 972,975 **** --- 983,990 ---- during the search task. + B<c_task> + + Name of the task originally invoked: 'search'. + B<c_object_class> ($) Index: CommonUpdate.pm =================================================================== RCS file: /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2/Action/CommonUpdate.pm,v retrieving revision 1.18 retrieving revision 1.19 diff -C2 -d -r1.18 -r1.19 *** CommonUpdate.pm 25 Sep 2004 17:48:51 -0000 1.18 --- CommonUpdate.pm 1 Dec 2004 05:07:02 -0000 1.19 *************** *** 14,17 **** --- 14,18 ---- sub display_form { my ( $self ) = @_; + $self->param( c_task => 'display_form' ); $self->_update_init_param; $log ||= get_logger( LOG_ACTION ); *************** *** 44,47 **** --- 45,49 ---- sub update { my ( $self ) = @_; + $self->param( c_task => 'update' ); $self->_update_init_param; *************** *** 233,236 **** --- 235,242 ---- =head2 System-created parameters + B<c_task> + + Name of the task originally invoked: 'display_form. + B<c_object_class> *************** *** 437,440 **** --- 443,450 ---- =head2 System-created parameters + B<c_task> + + Name of the task originally invoked: 'update'. + B<c_object_class> |
