[LON-CAPA-cvs] cvs: loncom /interface lonpickcourse.pm
bisitz
bisitz at source.lon-capa.org
Tue Feb 5 12:02:40 EST 2013
bisitz Tue Feb 5 17:02:40 2013 EDT
Modified files:
/loncom/interface lonpickcourse.pm
Log:
XHTML
Index: loncom/interface/lonpickcourse.pm
diff -u loncom/interface/lonpickcourse.pm:1.104 loncom/interface/lonpickcourse.pm:1.105
--- loncom/interface/lonpickcourse.pm:1.104 Tue Feb 5 16:38:00 2013
+++ loncom/interface/lonpickcourse.pm Tue Feb 5 17:02:40 2013
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Pick a course
#
-# $Id: lonpickcourse.pm,v 1.104 2013/02/05 16:38:00 bisitz Exp $
+# $Id: lonpickcourse.pm,v 1.105 2013/02/05 17:02:40 bisitz Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -133,8 +133,7 @@
$onlyown) {
$r->print(&gochoose_javascript($type,$multiple,$autosubmit,$lastaction));
}
- $r->print('<script type="text/javascript" language="Javascript">'.$jscript.
- '</script>');
+ $r->print(&Apache::lonhtmlcommon::scripttag($jscript));
$r->print($submitopener);
# ------------------------------------------ Display of filters to limit search
@@ -645,7 +644,7 @@
} else {
$typeselectform = '<select name="type" size="1"';
if ($onchange) {
- $typeselectform .= 'onchange="'.$onchange.'"';
+ $typeselectform .= ' onchange="'.$onchange.'"';
}
$typeselectform .= '>'."\n";
foreach my $posstype ('Course','Community') {
@@ -800,7 +799,7 @@
$output .= '<input type="hidden" name="cc_clone" value="'.$coord_cloneable.'" />';
}
}
- $output .= '<input type="hidden" name="updater" value="">'."\n".
+ $output .= '<input type="hidden" name="updater" value="" />'."\n".
'<input type="submit" name="gosearch" value="'.
&mt('Search').'" /></p>'."\n".'</form>'."\n".'<hr />'."\n";
return $jscript.$warning.$output;
@@ -1012,7 +1011,6 @@
},
);
my $output .= qq|
-<script type="text/javascript">
function gochoose(cname,cdom,cdesc) {
var openerForm = "$env{'form.form'}";
courseCount = 0;
@@ -1098,9 +1096,8 @@
$autosubmit
$lastaction
}
-</script>
|;
- return $output;
+ return &Apache::lonhtmlcommon::scripttag($output);
}
1;
More information about the LON-CAPA-cvs
mailing list