version 1.81, 2004/10/26 23:00:11
|
version 1.83, 2004/12/06 21:41:01
|
Line 150 sub loadmap {
|
Line 150 sub loadmap {
|
$hash{'version_'.$turi}=$1; |
$hash{'version_'.$turi}=$1; |
} |
} |
} |
} |
|
my $title=$token->[2]->{'title'}; |
|
$title=~s/\&colon\;/\:/gs; |
&Apache::lonnet::do_cache(\%Apache::lonnet::titlecache, |
&Apache::lonnet::do_cache(\%Apache::lonnet::titlecache, |
&Apache::lonnet::encode_symb($uri,$token->[2]->{'id'}, |
&Apache::lonnet::encode_symb($uri,$token->[2]->{'id'}, |
$turi), |
$turi),$title,'title'); |
$token->[2]->{'title'},'title'); |
|
unless ($ispage) { |
unless ($ispage) { |
$turi=~/\.(\w+)$/; |
$turi=~/\.(\w+)$/; |
my $embstyle=&Apache::loncommon::fileembstyle($1); |
my $embstyle=&Apache::loncommon::fileembstyle($1); |
Line 580 sub readmap {
|
Line 581 sub readmap {
|
} |
} |
# ---------------------------------------------------------------- Encrypt URLs |
# ---------------------------------------------------------------- Encrypt URLs |
foreach (keys %encurl) { |
foreach (keys %encurl) { |
$hash{'src_'.$_}=&Apache::lonenc::encrypted($hash{'src_'.$_}); |
# $hash{'src_'.$_}=&Apache::lonenc::encrypted($hash{'src_'.$_}); |
|
$hash{'encrypted_'.$_}=1; |
} |
} |
# ----------------------------------------------- Close hashes to finally store |
# ----------------------------------------------- Close hashes to finally store |
# --------------------------------- Routine must pass this point, no early outs |
# --------------------------------- Routine must pass this point, no early outs |