From: Chris W. <la...@us...> - 2005-03-29 16:58:32
|
Update of /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2/Controller In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv30314/Controller Modified Files: ManageBoxes.pm Log Message: OIN-58: add support for using 'box_name' in addition to 'name' Index: ManageBoxes.pm =================================================================== RCS file: /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2/Controller/ManageBoxes.pm,v retrieving revision 1.12 retrieving revision 1.13 diff -C2 -d -r1.12 -r1.13 *** ManageBoxes.pm 17 Mar 2005 14:58:01 -0000 1.12 --- ManageBoxes.pm 29 Mar 2005 16:57:56 -0000 1.13 *************** *** 26,30 **** return undef unless ( ref $box ); ! my $name = ( ref $box eq 'HASH' ) ? $box->{name} : $box->name; $log->is_info && $log->info( "Adding box '$name' to response" ); --- 26,36 ---- return undef unless ( ref $box ); ! my ( $name ); ! if ( ref $box eq 'HASH' ) { ! $name = $box->{box_name} || $box->{name}; ! } ! else { ! $name = $box->param( 'box_name' ) || $box->name; ! } $log->is_info && $log->info( "Adding box '$name' to response" ); |