version 1.10, 2000/10/02 16:16:06
|
version 1.12, 2000/10/20 14:43:53
|
Line 11
|
Line 11
|
# 7/1,7/3,7/4,7/7,7/8,7/10 Gerd Kortemeyer) |
# 7/1,7/3,7/4,7/7,7/8,7/10 Gerd Kortemeyer) |
# |
# |
# 7/15,7/17,7/18,8/1,8/2,8/4,8/5,8/21,8/22,8/23,8/30, |
# 7/15,7/17,7/18,8/1,8/2,8/4,8/5,8/21,8/22,8/23,8/30, |
# 9/2,9/4,9/29,9/30,10/2 Gerd Kortemeyer |
# 9/2,9/4,9/29,9/30,10/2,10/11 Gerd Kortemeyer |
|
|
package Apache::lonuserstate; |
package Apache::lonuserstate; |
|
|
Line 21 use Apache::File;
|
Line 21 use Apache::File;
|
use HTML::TokeParser; |
use HTML::TokeParser; |
use Apache::lonnet(); |
use Apache::lonnet(); |
use GDBM_File; |
use GDBM_File; |
|
use Apache::lonmsg; |
|
|
# ---------------------------------------------------- Globals for this package |
# ---------------------------------------------------- Globals for this package |
|
|
Line 310 sub readmap {
|
Line 311 sub readmap {
|
return 'No course data available.'; |
return 'No course data available.'; |
} |
} |
@cond=('true:normal'); |
@cond=('true:normal'); |
|
unlink($fn.'.db'); |
|
unlink($fn.'_symb.db'); |
|
unlink($fn.'.state'); |
if (tie(%hash,'GDBM_File',"$fn.db",&GDBM_WRCREAT,0640)) { |
if (tie(%hash,'GDBM_File',"$fn.db",&GDBM_WRCREAT,0640)) { |
%hash=(); |
%hash=(); |
$errtext=''; |
$errtext=''; |
Line 336 sub readmap {
|
Line 340 sub readmap {
|
&Apache::lonnet::logthis("<font color=blue>WARNING: ". |
&Apache::lonnet::logthis("<font color=blue>WARNING: ". |
"Could not tie coursemap $fn for $uri.</font>"); |
"Could not tie coursemap $fn for $uri.</font>"); |
} |
} |
|
&Apache::lonmsg::author_res_msg($ENV{'request.course.uri'},$errtext); |
return $errtext; |
return $errtext; |
} |
} |
|
|