[prev in list] [next in list] [prev in thread] [next in thread]
List: lon-capa-cvs
Subject: [LON-CAPA-cvs] cvs: loncom / Lond.pm
From: raeburn via LON-CAPA-cvs <lon-capa-cvs () mail ! lon-capa ! org>
Date: 2022-01-19 16:02:59
Message-ID: cvsraeburn1642608179 () cvsserver
[Download RAW message or body]
raeburn Wed Jan 19 16:02:59 2022 EDT
Modified files:
/loncom Lond.pm
Log:
- Use fully qualified subroutine name for logthis() to eliminate ISE, since
lonnet.pm does not export the logthis function.
Index: loncom/Lond.pm
diff -u loncom/Lond.pm:1.16 loncom/Lond.pm:1.17
--- loncom/Lond.pm:1.16 Mon Feb 8 14:50:53 2021
+++ loncom/Lond.pm Wed Jan 19 16:02:59 2022
@@ -1,6 +1,6 @@
# The LearningOnline Network
#
-# $Id: Lond.pm,v 1.16 2021/02/08 14:50:53 raeburn Exp $
+# $Id: Lond.pm,v 1.17 2022/01/19 16:02:59 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -242,10 +242,10 @@
}
}
unless (&untie_domain_hash($hashref)) {
- &logthis("Failed to untie tied hash for nohist_courseids.db for \
$domain"); + &Apache::lonnet::logthis("Failed to untie tied hash \
for nohist_courseids.db for $domain"); }
} else {
- &logthis("Failed to tie hash for nohist_courseids.db for $domain");
+ &Apache::lonnet::logthis("Failed to tie hash for nohist_courseids.db \
for $domain"); }
}
foreach my $hashid (keys(%recent)) {
@@ -317,9 +317,9 @@
};
if ($@) {
if ($@ eq "timeout\n") {
- &logthis("<font color='blue'>WARNING courseiddump for $cnum:$cdom from \
$home timedout</font>"); + &Apache::lonnet::logthis("<font \
color='blue'>WARNING courseiddump for $cnum:$cdom from $home timedout</font>"); } \
else {
- &logthis("<font color='yellow'>WARNING unexpected error during eval of \
call for courseiddump from $home</font>"); + \
&Apache::lonnet::logthis("<font color='yellow'>WARNING unexpected error during eval \
of call for courseiddump from $home</font>"); }
} else {
if (ref($info{$cdom.'_'.$cnum}) eq 'HASH') {
@@ -805,10 +805,10 @@
}
&Apache::lonnet::do_cache_new('iscourse',$hashid,$iscourse,3600);
unless (&untie_domain_hash($hashref)) {
- &logthis("Failed to untie tied hash for nohist_courseids.db for \
$cdom"); + &Apache::lonnet::logthis("Failed to untie tied hash for \
nohist_courseids.db for $cdom"); }
} else {
- &logthis("Failed to tie hash for nohist_courseids.db for $cdom");
+ &Apache::lonnet::logthis("Failed to tie hash for nohist_courseids.db for \
$cdom"); }
}
return $iscourse;
_______________________________________________
LON-CAPA-cvs mailing list
LON-CAPA-cvs@mail.lon-capa.org
http://mail.lon-capa.org/mailman/listinfo/lon-capa-cvs
[prev in list] [next in list] [prev in thread] [next in thread]
Configure |
About |
News |
Add a list |
Sponsored by KoreLogic