[LON-CAPA-cvs] cvs: loncom /xml lonxml.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Mon, 09 Dec 2002 22:40:19 -0000
albertel Mon Dec 9 17:40:19 2002 EDT
Modified files:
/loncom/xml lonxml.pm
Log:
- debug cleanup
Index: loncom/xml/lonxml.pm
diff -u loncom/xml/lonxml.pm:1.219 loncom/xml/lonxml.pm:1.220
--- loncom/xml/lonxml.pm:1.219 Fri Dec 6 14:29:02 2002
+++ loncom/xml/lonxml.pm Mon Dec 9 17:40:18 2002
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# XML Parser Module
#
-# $Id: lonxml.pm,v 1.219 2002/12/06 19:29:02 matthew Exp $
+# $Id: lonxml.pm,v 1.220 2002/12/09 22:40:18 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -813,13 +813,13 @@
}
if (!$deleted) {
if ($space) {
- &Apache::lonxml::debug("Calling sub $sub in $space $metamode");
+ #&Apache::lonxml::debug("Calling sub $sub in $space $metamode");
$sub1="$space\:\:$sub";
($currentstring,$nodefault) = &$sub1($target,$token,$tagstack,
$parstack,$parser,$safeeval,
$style);
} else {
- &Apache::lonxml::debug("NOT Calling sub $sub in $space $metamode");
+ #&Apache::lonxml::debug("NOT Calling sub $sub in $space $metamode");
if ($metamode <1) {
if (defined($token->[4]) && ($metamode < 1)) {
$currentstring = $token->[4];
@@ -831,7 +831,7 @@
# &Apache::lonxml::debug("nodefalt:$nodefault:");
if ($currentstring eq '' && $nodefault eq '') {
if ($target eq 'edit') {
- &Apache::lonxml::debug("doing default edit for $token->[1]");
+ #&Apache::lonxml::debug("doing default edit for $token->[1]");
if ($token->[0] eq 'S') {
$currentstring = &Apache::edit::tag_start($target,$token);
} elsif ($token->[0] eq 'E') {