[LON-CAPA-cvs] cvs: loncom /homework imageresponse.pm matchresponse.pm optionresponse.pm radiobuttonresponse.pm rankresponse.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Tue, 21 Jun 2005 21:00:57 -0000
albertel Tue Jun 21 17:00:57 2005 EDT
Modified files:
/loncom/homework imageresponse.pm matchresponse.pm
optionresponse.pm radiobuttonresponse.pm
rankresponse.pm
Log:
- BIG#4142 ratche foil unamedness downn to warning
Index: loncom/homework/imageresponse.pm
diff -u loncom/homework/imageresponse.pm:1.70 loncom/homework/imageresponse.pm:1.71
--- loncom/homework/imageresponse.pm:1.70 Tue Jun 7 18:43:08 2005
+++ loncom/homework/imageresponse.pm Tue Jun 21 17:00:55 2005
@@ -2,7 +2,7 @@
# The LearningOnline Network with CAPA
# image click response style
#
-# $Id: imageresponse.pm,v 1.70 2005/06/07 22:43:08 foxr Exp $
+# $Id: imageresponse.pm,v 1.71 2005/06/21 21:00:55 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -348,7 +348,7 @@
$target eq 'analyze') {
my $name = &Apache::lonxml::get_param('name',$parstack,$safeeval);
if (!$name) {
- &Apache::lonxml::error("Foils without names exist. This can cause problems to malfunction.");
+ &Apache::lonxml::warning("Foils without names exist. This can cause problems to malfunction.");
$name=$Apache::lonxml::curdepth;
}
if (defined($Apache::response::foilnames{$name})) {
Index: loncom/homework/matchresponse.pm
diff -u loncom/homework/matchresponse.pm:1.53 loncom/homework/matchresponse.pm:1.54
--- loncom/homework/matchresponse.pm:1.53 Mon Jun 20 17:31:07 2005
+++ loncom/homework/matchresponse.pm Tue Jun 21 17:00:55 2005
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Full matching style response
#
-# $Id: matchresponse.pm,v 1.53 2005/06/20 21:31:07 albertel Exp $
+# $Id: matchresponse.pm,v 1.54 2005/06/21 21:00:55 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -656,7 +656,7 @@
my $name = &Apache::lonxml::get_param('name',$parstack,$safeeval);
&Apache::lonxml::debug("Got a name of :$name:");
if (!$name) {
- &Apache::lonxml::error("Foils without names exist. This can cause problems to malfunction.");
+ &Apache::lonxml::warning("Foils without names exist. This can cause problems to malfunction.");
$name=$Apache::lonxml::curdepth;
}
&Apache::lonxml::debug("Using a name of :$name:");
Index: loncom/homework/optionresponse.pm
diff -u loncom/homework/optionresponse.pm:1.127 loncom/homework/optionresponse.pm:1.128
--- loncom/homework/optionresponse.pm:1.127 Mon Jun 20 17:31:07 2005
+++ loncom/homework/optionresponse.pm Tue Jun 21 17:00:55 2005
@@ -1,7 +1,7 @@
# LearningOnline Network with CAPA
# option list style responses
#
-# $Id: optionresponse.pm,v 1.127 2005/06/20 21:31:07 albertel Exp $
+# $Id: optionresponse.pm,v 1.128 2005/06/21 21:00:55 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -633,7 +633,7 @@
my $name = &Apache::lonxml::get_param('name',$parstack,$safeeval);
&Apache::lonxml::debug("Got a name of :$name:");
if (!$name) {
- &Apache::lonxml::error("Foils without names exist. This can cause problems to malfunction.");
+ &Apache::lonxml::warning("Foils without names exist. This can cause problems to malfunction.");
$name=$Apache::lonxml::curdepth;
}
&Apache::lonxml::debug("Using a name of :$name:");
Index: loncom/homework/radiobuttonresponse.pm
diff -u loncom/homework/radiobuttonresponse.pm:1.100 loncom/homework/radiobuttonresponse.pm:1.101
--- loncom/homework/radiobuttonresponse.pm:1.100 Thu Apr 7 02:56:22 2005
+++ loncom/homework/radiobuttonresponse.pm Tue Jun 21 17:00:55 2005
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# mutliple choice style responses
#
-# $Id: radiobuttonresponse.pm,v 1.100 2005/04/07 06:56:22 albertel Exp $
+# $Id: radiobuttonresponse.pm,v 1.101 2005/06/21 21:00:55 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -608,7 +608,7 @@
if ($value ne 'unused') {
my $name = &Apache::lonxml::get_param('name',$parstack,$safeeval);
if (!$name) {
- &Apache::lonxml::error("Foils without names exist. This can cause problems to malfunction.");
+ &Apache::lonxml::warning("Foils without names exist. This can cause problems to malfunction.");
$name=$Apache::lonxml::curdepth;
}
if (defined($Apache::response::foilnames{$name})) {
Index: loncom/homework/rankresponse.pm
diff -u loncom/homework/rankresponse.pm:1.46 loncom/homework/rankresponse.pm:1.47
--- loncom/homework/rankresponse.pm:1.46 Mon Jun 20 17:31:07 2005
+++ loncom/homework/rankresponse.pm Tue Jun 21 17:00:55 2005
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# rank style response
#
-# $Id: rankresponse.pm,v 1.46 2005/06/20 21:31:07 albertel Exp $
+# $Id: rankresponse.pm,v 1.47 2005/06/21 21:00:55 albertel Exp $
# Copyright Michigan State University Board of Trustees
#
# This file is part of the LearningOnline Network with CAPA (LON-CAPA).
@@ -429,7 +429,7 @@
my $name = &Apache::lonxml::get_param('name',$parstack,$safeeval);
&Apache::lonxml::debug("Got a name of :$name:");
if (!$name) {
- &Apache::lonxml::error("Foils without names exist. This can cause problems to malfunction.");
+ &Apache::lonxml::warning("Foils without names exist. This can cause problems to malfunction.");
$name=$Apache::lonxml::curdepth;
}
&Apache::lonxml::debug("Using a name of :$name:");