[LON-CAPA-cvs] cvs: loncom /homework lonsimpleproblemedit.pm /interface londocs.pm
www
lon-capa-cvs@mail.lon-capa.org
Tue, 04 Nov 2003 19:18:16 -0000
www Tue Nov 4 14:18:16 2003 EDT
Modified files:
/loncom/homework lonsimpleproblemedit.pm
/loncom/interface londocs.pm
Log:
Undef global in lonhomework that we are parsing a problem after bypassing
the normal rendering calls.
Index: loncom/homework/lonsimpleproblemedit.pm
diff -u loncom/homework/lonsimpleproblemedit.pm:1.7 loncom/homework/lonsimpleproblemedit.pm:1.8
--- loncom/homework/lonsimpleproblemedit.pm:1.7 Tue Nov 4 11:44:50 2003
+++ loncom/homework/lonsimpleproblemedit.pm Tue Nov 4 14:18:16 2003
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Simple Problem Parameter Setting "Editor"
#
-# $Id: lonsimpleproblemedit.pm,v 1.7 2003/11/04 16:44:50 www Exp $
+# $Id: lonsimpleproblemedit.pm,v 1.8 2003/11/04 19:18:16 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -61,6 +61,7 @@
$ENV{'user.name'}=time;
$ENV{'user.domain'}=time;
my $result = &Apache::lonxml::xmlparse($request,'web', $problem);
+ undef($Apache::lonhomework::parsing_a_problem);
$ENV{'user.name'}=$uname;
$ENV{'user.domain'}=$udom;
$result=~s/^.*\<body[^\>]*\>//si;
Index: loncom/interface/londocs.pm
diff -u loncom/interface/londocs.pm:1.93 loncom/interface/londocs.pm:1.94
--- loncom/interface/londocs.pm:1.93 Wed Oct 29 16:50:41 2003
+++ loncom/interface/londocs.pm Tue Nov 4 14:18:16 2003
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Documents
#
-# $Id: londocs.pm,v 1.93 2003/10/29 21:50:41 www Exp $
+# $Id: londocs.pm,v 1.94 2003/11/04 19:18:16 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -510,6 +510,7 @@
&Apache::lonxml::xmlparse($r,'web',
&Apache::lonnet::getfile(
&Apache::lonnet::filelocation('',$url)));
+ undef($Apache::lonhomework::parsing_a_problem);
$ENV{'request.filename'}=$oldpath;
if (($Apache::lonxml::errorcount) ||
($Apache::lonxml::warningcount)) {