Update of /cvsroot/openinteract/OpenInteract/OpenInteract
In directory usw-pr-cvs1:/tmp/cvs-serv7388
Modified Files:
SPOPS.pm
Log Message:
update so that we only check for parameters if the apache handler exists
Index: SPOPS.pm
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract/OpenInteract/SPOPS.pm,v
retrieving revision 1.18
retrieving revision 1.19
diff -C2 -d -r1.18 -r1.19
*** SPOPS.pm 2001/10/29 14:58:33 1.18
--- SPOPS.pm 2001/11/26 13:18:32 1.19
***************
*** 130,134 ****
my $now = SPOPS::Utility->now;
my $class = ref $self || $self;
! my $log_msg = $R->apache->param( '_log_message' );
$R->DEBUG && $R->scrib( 1, "Entering action $action to $class ($id) by $uid on $now" );
eval { $self->db_insert({ db => $R->db,
--- 130,137 ----
my $now = SPOPS::Utility->now;
my $class = ref $self || $self;
! my ( $log_msg );
! if ( my $apr = $R->apache ) {
! $log_msg = $apr->param( '_log_message' );
! }
$R->DEBUG && $R->scrib( 1, "Entering action $action to $class ($id) by $uid on $now" );
eval { $self->db_insert({ db => $R->db,
|
