--- rat/lonsequence.pm 2009/02/16 13:52:04 1.37
+++ rat/lonsequence.pm 2009/05/16 23:21:12 1.39
@@ -2,7 +2,7 @@
#
# Sequence Handler
#
-# $Id: lonsequence.pm,v 1.37 2009/02/16 13:52:04 bisitz Exp $
+# $Id: lonsequence.pm,v 1.39 2009/05/16 23:21:12 bisitz Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -102,10 +102,10 @@ ENDSCRIPT
'
'.$url.'
');
# ------------------ This is trying to select. Provide buttons and tie %selhash
if ($env{'form.forceselect'}) { $r->print(<
-
-
+
ENDSELECT
my $diropendb =
@@ -151,7 +151,7 @@ ENDSELECT
if ($successtied) {
my $checked='';
if ($selhash{'store_'.$url}) {
- $checked=" checked";
+ $checked=' checked="checked"';
}
$selhash{"pre_${idx}_link"}=$url;
$selhash{"pre_${idx}_title"}=$title;
@@ -170,7 +170,7 @@ ENDCHECKBOX
if ($successtied) {
$r->print('');
} else {
- $r->print('
');
+ $r->print('
');
}
}
}