--- loncom/homework/edit.pm 2011/11/24 13:28:01 1.139
+++ loncom/homework/edit.pm 2012/08/07 14:54:10 1.142
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# edit mode helpers
#
-# $Id: edit.pm,v 1.139 2011/11/24 13:28:01 www Exp $
+# $Id: edit.pm,v 1.142 2012/08/07 14:54:10 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -427,6 +427,12 @@ sub insert_plotvector {
';
}
+sub insert_drawvectorsum {
+ return '
+';
+}
+
+
sub insert_functionplotrule {
return '
';
@@ -738,6 +744,7 @@ sub js_change_detection {
my $unsaved=&mt("There are unsaved changes");
return (<
SCRIPT
}
@@ -952,13 +960,16 @@ sub checked_arg {
}
sub text_arg {
- my ($description,$name,$token,$size) = @_;
+ my ($description,$name,$token,$size, $class) = @_;
my $result;
if (!defined $size) { $size=20; }
my $arg=$token->[2]{$name};
$result=&mt($description).' ';
+ '" type="text" value="'.$arg.'" size="'.$size.'" ';
+ if (defined $class) {
+ $result .= 'class="' . $class . '" ';
+ }
+ $result .= &element_change_detection().'/>';
return ''.$result.'';
}