Return to lonuserstate.pm CVS log | Up to [LON-CAPA] / rat |
version 1.111, 2006/05/12 00:02:22 | version 1.112, 2006/05/12 15:30:53 |
---|---|
Line 597 sub readmap { | Line 597 sub readmap { |
} elsif ($key =~ /^(map_(?:start|finish|pc)_)(.*)/) { | } elsif ($key =~ /^(map_(?:start|finish|pc)_)(.*)/) { |
my ($type, $url) = ($1,$2); | my ($type, $url) = ($1,$2); |
my $value = $hash{$key}; | my $value = $hash{$key}; |
delete($hash{$key}); | |
$hash{$type.&putinversion($url)}=$value; | $hash{$type.&putinversion($url)}=$value; |
} | } |
} | } |