line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
package CGI::Test::Form::Widget::Button::Plain; |
2
|
14
|
|
|
14
|
|
42
|
use strict; |
|
14
|
|
|
|
|
14
|
|
|
14
|
|
|
|
|
272
|
|
3
|
14
|
|
|
14
|
|
32
|
use warnings; |
|
14
|
|
|
|
|
14
|
|
|
14
|
|
|
|
|
244
|
|
4
|
|
|
|
|
|
|
################################################################## |
5
|
|
|
|
|
|
|
# $Id: Plain.pm 411 2011-09-26 11:19:30Z nohuhu@nohuhu.org $ |
6
|
|
|
|
|
|
|
# $Name: cgi-test_0-104_t1 $ |
7
|
|
|
|
|
|
|
################################################################## |
8
|
|
|
|
|
|
|
# |
9
|
|
|
|
|
|
|
# Copyright (c) 2001, Raphael Manfredi |
10
|
|
|
|
|
|
|
# |
11
|
|
|
|
|
|
|
# You may redistribute only under the terms of the Artistic License, |
12
|
|
|
|
|
|
|
# as specified in the README file that comes with the distribution. |
13
|
|
|
|
|
|
|
# |
14
|
|
|
|
|
|
|
|
15
|
14
|
|
|
14
|
|
33
|
use Carp; |
|
14
|
|
|
|
|
15
|
|
|
14
|
|
|
|
|
548
|
|
16
|
|
|
|
|
|
|
|
17
|
|
|
|
|
|
|
# |
18
|
|
|
|
|
|
|
# This class models a FORM plain |
19
|
|
|
|
|
|
|
# |
20
|
|
|
|
|
|
|
|
21
|
14
|
|
|
14
|
|
36
|
use base qw(CGI::Test::Form::Widget::Button); |
|
14
|
|
|
|
|
14
|
|
|
14
|
|
|
|
|
1071
|
|
22
|
|
|
|
|
|
|
|
23
|
|
|
|
|
|
|
# |
24
|
|
|
|
|
|
|
# Attribute access |
25
|
|
|
|
|
|
|
# |
26
|
|
|
|
|
|
|
|
27
|
|
|
|
|
|
|
sub gui_type |
28
|
|
|
|
|
|
|
{ |
29
|
0
|
|
|
0
|
1
|
|
return "plain button"; |
30
|
|
|
|
|
|
|
} |
31
|
|
|
|
|
|
|
|
32
|
|
|
|
|
|
|
# |
33
|
|
|
|
|
|
|
# Button predicates |
34
|
|
|
|
|
|
|
# |
35
|
|
|
|
|
|
|
|
36
|
|
|
|
|
|
|
sub is_plain |
37
|
|
|
|
|
|
|
{ |
38
|
0
|
|
|
0
|
1
|
|
return 1; |
39
|
|
|
|
|
|
|
} |
40
|
|
|
|
|
|
|
|
41
|
|
|
|
|
|
|
1; |
42
|
|
|
|
|
|
|
|
43
|
|
|
|
|
|
|
=head1 NAME |
44
|
|
|
|
|
|
|
|
45
|
|
|
|
|
|
|
CGI::Test::Form::Widget::Button::Plain - A button with client-side processing |
46
|
|
|
|
|
|
|
|
47
|
|
|
|
|
|
|
=head1 SYNOPSIS |
48
|
|
|
|
|
|
|
|
49
|
|
|
|
|
|
|
# Inherits from CGI::Test::Form::Widget::Button |
50
|
|
|
|
|
|
|
|
51
|
|
|
|
|
|
|
=head1 DESCRIPTION |
52
|
|
|
|
|
|
|
|
53
|
|
|
|
|
|
|
This class models a plain button, which probably has some client-side |
54
|
|
|
|
|
|
|
processing attached to it. Unfortunately, C does not support |
55
|
|
|
|
|
|
|
this, so there's not much you can do with this button, apart from making |
56
|
|
|
|
|
|
|
sure it is present. |
57
|
|
|
|
|
|
|
|
58
|
|
|
|
|
|
|
The interface is the same as the one described in |
59
|
|
|
|
|
|
|
L. |
60
|
|
|
|
|
|
|
|
61
|
|
|
|
|
|
|
=head1 AUTHORS |
62
|
|
|
|
|
|
|
|
63
|
|
|
|
|
|
|
The original author is Raphael Manfredi. |
64
|
|
|
|
|
|
|
|
65
|
|
|
|
|
|
|
Steven Hilton was long time maintainer of this module. |
66
|
|
|
|
|
|
|
|
67
|
|
|
|
|
|
|
Current maintainer is Alexander Tokarev Ftokarev@cpan.orgE>. |
68
|
|
|
|
|
|
|
|
69
|
|
|
|
|
|
|
=head1 SEE ALSO |
70
|
|
|
|
|
|
|
|
71
|
|
|
|
|
|
|
CGI::Test::Form::Widget::Button(3). |
72
|
|
|
|
|
|
|
|
73
|
|
|
|
|
|
|
=cut |
74
|
|
|
|
|
|
|
|