|
Server : Apache/2.2.2 (Fedora) System : Linux App1.pathumtani.go.th 2.6.20-1.2320.fc5smp #1 SMP Tue Jun 12 19:40:16 EDT 2007 i686 User : apache ( 48) PHP Version : 5.2.9 Disable Function : NONE Directory : /proc/self/root/usr/libexec/webmin/Webmin/ |
Upload File : |
package Webmin::Submit;
use Webmin::Input;
@ISA = ( "Webmin::Input" );
=head2 new Webmin::Submit(label, [name], [disabled])
Create a form submit button
=cut
sub new
{
if (defined(&Webmin::Theme::Submit::new) &&
caller() !~ /Webmin::Theme::Submit/) {
return new Webmin::Theme::Submit(@_[1..$#_]);
}
my ($self, $value, $name, $disabled) = @_;
$self = { };
bless($self);
$self->set_value($value);
$self->set_name($name) if ($name);
$self->set_disabled($disabled) if ($disabled);
return $self;
}
=head2 html()
Returns the HTML for this form submit button
=cut
sub html
{
my ($self) = @_;
return &main::ui_submit($self->get_value(), $self->get_name(),
$self->get_disabled());
}
sub get_value
{
my ($self) = @_;
return $self->{'value'};
}
1;