projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
more datavolume format
[freeside.git]
/
FS
/
FS
/
part_virtual_field.pm
diff --git
a/FS/FS/part_virtual_field.pm
b/FS/FS/part_virtual_field.pm
index
992d449
..
ea973ba
100755
(executable)
--- a/
FS/FS/part_virtual_field.pm
+++ b/
FS/FS/part_virtual_field.pm
@@
-4,6
+4,7
@@
use strict;
use vars qw( @ISA );
use FS::Record qw( qsearchs qsearch );
use FS::Schema qw( dbdef );
use vars qw( @ISA );
use FS::Record qw( qsearchs qsearch );
use FS::Schema qw( dbdef );
+use CGI qw(escapeHTML);
@ISA = qw( FS::Record );
@ISA = qw( FS::Record );
@@
-244,7
+245,7
@@
sub widget {
}
} else {
$text .= q!<INPUT NAME="! . $self->name .
}
} else {
$text .= q!<INPUT NAME="! . $self->name .
- q!" VALUE="! .
$value
. q!"!;
+ q!" VALUE="! .
escapeHTML($value)
. q!"!;
if ($self->length) {
$text .= q! SIZE="! . $self->length . q!"!;
}
if ($self->length) {
$text .= q! SIZE="! . $self->length . q!"!;
}