version 1.217, 2006/01/12 22:28:03
|
version 1.217.2.1, 2006/02/10 10:16:38
|
Line 1401 sub entryline {
|
Line 1401 sub entryline {
|
$foldertitle; |
$foldertitle; |
} |
} |
$renametitle=~s/\"\;/\\\"/g; |
$renametitle=~s/\"\;/\\\"/g; |
|
$renametitle=~s/\\/\\\\/g; |
my $line='<tr>'; |
my $line='<tr>'; |
# Edit commands |
# Edit commands |
my $container; |
my $container; |
Line 1666 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 |