From: Chris W. <la...@us...> - 2005-09-22 03:38:11
|
Update of /cvsroot/openinteract/OpenInteract2/pkg/whats_new/OpenInteract2 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv1265/OpenInteract2 Modified Files: WhatsNewTrack.pm Log Message: remove object-level security, ensure app security is of the 'only allowed' variety; use URL-params where possible; try to eliminate double adding... Index: WhatsNewTrack.pm =================================================================== RCS file: /cvsroot/openinteract/OpenInteract2/pkg/whats_new/OpenInteract2/WhatsNewTrack.pm,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** WhatsNewTrack.pm 18 Mar 2005 04:09:47 -0000 1.5 --- WhatsNewTrack.pm 22 Sep 2005 03:37:54 -0000 1.6 *************** *** 20,24 **** $log ||= get_logger( LOG_APP ); my $obj_class = ref $class || $class; ! push @{ $rs_table->{post_save_action} }, \&add_object_to_new; push @{ $rs_table->{post_remove_action} }, \&remove_object_from_new; $log->info( "What's new functionality installed for $obj_class" ); --- 20,24 ---- $log ||= get_logger( LOG_APP ); my $obj_class = ref $class || $class; ! push @{ $rs_table->{post_save_action} }, \&add_object_to_new; push @{ $rs_table->{post_remove_action} }, \&remove_object_from_new; $log->info( "What's new functionality installed for $obj_class" ); *************** *** 38,41 **** --- 38,45 ---- return 1; } + if ( $self->{tmp_new_track} eq 'yes' ) { + $log->info( "Not creating What's New item, this one already added" ); + return 1; + } my $object_id = $self->id; my $info = $self->object_description; *************** *** 64,68 **** } else { ! return $new; } } --- 68,73 ---- } else { ! $self->{tmp_new_track} = 'yes'; ! return 1; } } |