version 1.139, 2011/11/24 13:28:01
|
version 1.142, 2012/08/07 14:54:10
|
Line 427 sub insert_plotvector {
|
Line 427 sub insert_plotvector {
|
<plotvector />'; |
<plotvector />'; |
} |
} |
|
|
|
sub insert_drawvectorsum { |
|
return ' |
|
<drawvectorsum />'; |
|
} |
|
|
|
|
sub insert_functionplotrule { |
sub insert_functionplotrule { |
return ' |
return ' |
<functionplotrule />'; |
<functionplotrule />'; |
Line 738 sub js_change_detection {
|
Line 744 sub js_change_detection {
|
my $unsaved=&mt("There are unsaved changes"); |
my $unsaved=&mt("There are unsaved changes"); |
return (<<SCRIPT); |
return (<<SCRIPT); |
<script type="text/javascript"> |
<script type="text/javascript"> |
|
// <![CDATA[ |
var clean = true; |
var clean = true; |
var is_submit = false; |
var is_submit = false; |
var still_ask = false; |
var still_ask = false; |
Line 756 function unClean() {
|
Line 763 function unClean() {
|
clean=false; |
clean=false; |
} |
} |
window.onbeforeunload = compareForm; |
window.onbeforeunload = compareForm; |
|
// ]]> |
</script> |
</script> |
SCRIPT |
SCRIPT |
} |
} |
Line 952 sub checked_arg {
|
Line 960 sub checked_arg {
|
} |
} |
|
|
sub text_arg { |
sub text_arg { |
my ($description,$name,$token,$size) = @_; |
my ($description,$name,$token,$size, $class) = @_; |
my $result; |
my $result; |
if (!defined $size) { $size=20; } |
if (!defined $size) { $size=20; } |
my $arg=$token->[2]{$name}; |
my $arg=$token->[2]{$name}; |
$result=&mt($description).' <input name="'.&html_element_name($name). |
$result=&mt($description).' <input name="'.&html_element_name($name). |
'" type="text" value="'.$arg.'" size="'.$size.'" '. |
'" type="text" value="'.$arg.'" size="'.$size.'" '; |
&element_change_detection().'/>'; |
if (defined $class) { |
|
$result .= 'class="' . $class . '" '; |
|
} |
|
$result .= &element_change_detection().'/>'; |
return '<span class="LC_nobreak">'.$result.'</span>'; |
return '<span class="LC_nobreak">'.$result.'</span>'; |
} |
} |
|
|