richter at apache
May 5, 2013, 5:02 AM
Post #1 of 1
(96 views)
Permalink
|
|
svn commit: r1479302 - /perl/embperl/trunk/Embperl/Form/ControlMultValue.pm
|
|
Author: richter
Date: Sun May 5 12:02:33 2013
New Revision: 1479302
URL: http://svn.apache.org/r1479302
Log:
set _opt_ name only temporary in readonly select
Modified:
perl/embperl/trunk/Embperl/Form/ControlMultValue.pm
Modified: perl/embperl/trunk/Embperl/Form/ControlMultValue.pm
URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Form/ControlMultValue.pm?rev=1479302&r1=1479301&r2=1479302&view=diff
==============================================================================
--- perl/embperl/trunk/Embperl/Form/ControlMultValue.pm (original)
+++ perl/embperl/trunk/Embperl/Form/ControlMultValue.pm Sun May 5 12:02:33 2013
@@ -306,7 +306,7 @@ sub show_control_readonly
$option = '<Kein Zugriff>' if (!$option && $value && ($req->{userCtx}{role} ne '*')) ;
- $self -> {force_name} = '_opt_' . $self -> {name} ;
+ local $self -> {force_name} = '_opt_' . $self -> {name} ;
$self -> SUPER::show_control_readonly ($req, $option) ;
}
---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-cvs-unsubscribe [at] perl
For additional commands, e-mail: embperl-cvs-help [at] perl
|
