version 1.220, 2006/01/27 23:14:20
|
version 1.222, 2006/02/24 22:52:41
|
Line 1400 sub entryline {
|
Line 1400 sub entryline {
|
&Apache::loncommon::plainname($2,$3).': <br />'. |
&Apache::loncommon::plainname($2,$3).': <br />'. |
$foldertitle; |
$foldertitle; |
} |
} |
$renametitle=~s/\"\;/\\\"/g; |
|
$renametitle=~s/\\/\\\\/g; |
$renametitle=~s/\\/\\\\/g; |
|
$renametitle=~s/\"\;/\\\"/g; |
my $line='<tr>'; |
my $line='<tr>'; |
# Edit commands |
# Edit commands |
my $container; |
my $container; |
Line 1667 sub tiehash {
|
Line 1667 sub tiehash {
|
sub untiehash { |
sub untiehash { |
if ($hashtied) { untie %hash; } |
if ($hashtied) { untie %hash; } |
$hashtied=0; |
$hashtied=0; |
|
return OK; |
} |
} |
|
|
# --------------------------------------------------------------- check on this |
# --------------------------------------------------------------- check on this |