Upgrade to 4.2.2
[usit-rt.git] / share / html / Widgets / Form / Boolean
CommitLineData
84fb5b46
MKG
1%# BEGIN BPS TAGGED BLOCK {{{
2%#
3%# COPYRIGHT:
4%#
320f0092 5%# This software is Copyright (c) 1996-2014 Best Practical Solutions, LLC
84fb5b46
MKG
6%# <sales@bestpractical.com>
7%#
8%# (Except where explicitly superseded by other copyright notices)
9%#
10%#
11%# LICENSE:
12%#
13%# This work is made available to you under the terms of Version 2 of
14%# the GNU General Public License. A copy of that license should have
15%# been provided with this software, but in any event can be snarfed
16%# from www.gnu.org.
17%#
18%# This work is distributed in the hope that it will be useful, but
19%# WITHOUT ANY WARRANTY; without even the implied warranty of
20%# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
21%# General Public License for more details.
22%#
23%# You should have received a copy of the GNU General Public License
24%# along with this program; if not, write to the Free Software
25%# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
26%# 02110-1301 or visit their web page on the internet at
27%# http://www.gnu.org/licenses/old-licenses/gpl-2.0.html.
28%#
29%#
30%# CONTRIBUTION SUBMISSION POLICY:
31%#
32%# (The following paragraph is not intended to limit the rights granted
33%# to you to modify and distribute this software under the terms of
34%# the GNU General Public License and is only of importance to you if
35%# you choose to contribute your changes and enhancements to the
36%# community by submitting them to Best Practical Solutions, LLC.)
37%#
38%# By intentionally submitting any modifications, corrections or
39%# derivatives to this work, or any other work intended for use with
40%# Request Tracker, to Best Practical Solutions, LLC, you confirm that
41%# you are the copyright holder for those contributions and you grant
42%# Best Practical Solutions, LLC a nonexclusive, worldwide, irrevocable,
43%# royalty-free, perpetual, license to use, copy, create derivative
44%# works based on those contributions, and sublicense and distribute
45%# those contributions and any derivatives thereof.
46%#
47%# END BPS TAGGED BLOCK }}}
48<%DOC>
49see docs/extending/using_forms_widgets.pod
50</%DOC>
51<div id="form-box-<% lc $Name %>" class="widget">
52<span class="label description"><% $Description %></span>
53<span class="value"><& SELF:InputOnly, %ARGS &></span>
54<span class="hints"><% $Hints %></span>
55</div>
56<%ARGS>
57$Name => undef,
58$Description => undef,
59$Hints => ''
60</%ARGS>
61
62<%METHOD InputOnly>
63<%ARGS>
64$Name => undef,
65
66$Default => 0,
67$DefaultValue => 0,
68$DefaultLabel => loc( 'Use default ([_1])', $DefaultValue? loc('Yes'): loc('No') ),
69
70$CurrentValue => undef,
71</%ARGS>
72% unless ( $Default ) {
73<input type="hidden" name="<% $Name %>" value="0" />\
74<input type="checkbox" name="<% $Name %>" value="1" <% $CurrentValue? ' checked="checked"': '' |n %> />\
75% } else {
76<input type="radio" name="<% $Name %>" value="1" <% $CurrentValue? ' checked="checked"': '' |n %> />\
77<% loc('Yes') %>
78<input type="radio" name="<% $Name %>" value="0" <% defined $CurrentValue && !$CurrentValue? ' checked="checked"': '' |n %> />\
79<% loc('No') %>
80<input type="radio" name="<% $Name %>" value="__empty_value__" <% !defined $CurrentValue? ' checked="checked"': '' |n %> />\
81<% $DefaultLabel %>
82% }
83</%METHOD>
84
85<%METHOD Process>
86<%ARGS>
87$Name
88$Arguments => {},
89
90$Default => 0,
91$DefaultValue => 0,
92</%ARGS>
93<%INIT>
94my $value = $Arguments->{ $Name };
95if ( $Default ) {
96 return undef if !defined $value || $value eq '__empty_value__';
97 return $value? 1: 0;
98} else {
99 return $value? 1: 0 if defined $value;
100 return $DefaultValue;
101}
102</%INIT>
103</%METHOD>