|
From: Chris W. <la...@us...> - 2001-10-22 11:51:33
|
Update of /cvsroot/openinteract/SPOPS/SPOPS/Iterator
In directory usw-pr-cvs1:/tmp/cvs-serv698
Modified Files:
DBI.pm LDAP.pm
Log Message:
all calls to 'new()' when fetching objects should be accompanied by
'skip_default_values'
Index: DBI.pm
===================================================================
RCS file: /cvsroot/openinteract/SPOPS/SPOPS/Iterator/DBI.pm,v
retrieving revision 1.8
retrieving revision 1.9
diff -C2 -d -r1.8 -r1.9
*** DBI.pm 2001/10/12 21:00:26 1.8
--- DBI.pm 2001/10/22 11:51:30 1.9
***************
*** 73,77 ****
# It's ok to create the object now
! $obj = $object_class->new;
$obj->_fetch_assign_row( $self->{_FIELDS}, $row );
--- 73,77 ----
# It's ok to create the object now
! $obj = $object_class->new({ skip_default_values => 1 });
$obj->_fetch_assign_row( $self->{_FIELDS}, $row );
Index: LDAP.pm
===================================================================
RCS file: /cvsroot/openinteract/SPOPS/SPOPS/Iterator/LDAP.pm,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** LDAP.pm 2001/10/12 21:00:26 1.7
--- LDAP.pm 2001/10/22 11:51:30 1.8
***************
*** 73,77 ****
# It's ok to create the object now
! $obj = $object_class->new;
$obj->_fetch_assign_row( undef, $entry );
--- 73,77 ----
# It's ok to create the object now
! $obj = $object_class->new({ skip_default_values => 1 });
$obj->_fetch_assign_row( undef, $entry );
|