oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

first round of changes for the new session system

Browse source
This commit is contained in:
JT Smith 2005-12-31 21:54:06 +00:00
parent da95226072
commit d4b7f2ce59
128 changed files with 2442 additions and 1478 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lib/WebGUI/Form/Submit.pm
View file

@ -66,12 +66,12 @@ Renders a button.
sub toHtml {
my $self = shift;
my $value = $self->fixQuotes($self->{value});
$self->{extras} ||= 'onclick="this.value=\''.WebGUI::International::get(452).'\'"';
my $value = $self->fixQuotes($self->get("value"));
$self->get("extras") ||= 'onclick="this.value=\''.WebGUI::International::get(452).'\'"';
my $html = '<input type="submit" ';
$html .= 'name="'.$self->{name}.'" ' if ($self->{name});
$html .= 'name="'.$self->get("name").'" ' if ($self->get("name"));
$html .= 'id="'.$self->{id}.'" ' unless ($self->{id} eq "_formId");
$html .= 'value="'.$value.'" '.$self->{extras}.' />';
$html .= 'value="'.$value.'" '.$self->get("extras").' />';
return $html;
}