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

WebGUI 3.0.2 release

Browse source
This commit is contained in:
JT Smith 2002-01-23 04:14:00 +00:00
parent 237925b365
commit 2845282544
8 changed files with 49 additions and 20 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lib/WebGUI/Form.pm
View file

@ -140,6 +140,7 @@ sub text {
sub textArea {
my ($output, $name, $value, $cols, $rows, $htmlEdit, $wrap);
($name, $value, $cols, $rows, $htmlEdit, $wrap) = @_;
$output = '<script language="JavaScript">function fixChars(element) {element.value = element.value.replace(/~V/mg,"-");}</script>';
if ($cols eq "") {
$cols = 50;
}
@ -153,7 +154,7 @@ sub textArea {
if ($wrap eq "") {
$wrap = "virtual";
}
$output .= '<textarea name="'.$name.'" cols="'.$cols.'" rows="'.$rows.'" wrap="'.$wrap.'">'.$value.'</textarea>';
$output .= '<textarea name="'.$name.'" cols="'.$cols.'" rows="'.$rows.'" wrap="'.$wrap.'" onBlur="fixChars(this.form.'.$name.')">'.$value.'</textarea>';
return $output;
}