loncom/lonenc.pm - diff

Return to lonenc.pm CVS log

Up to [LON-CAPA] / loncom

version 1.23, 2008/03/17 09:51:40	version 1.24, 2008/12/19 14:29:13
Line 165 sub encrypt_ref {	Line 165 sub encrypt_ref {
next if (!$value);	next if (!$value);
next if ($value =~ /^\w+:/); # explict javascript: or http: link	next if ($value =~ /^\w+:/); # explict javascript: or http: link
my $href=&Apache::lonnet::hreflocation($Apache::lonxml::pwd[-1],$value);	my $href=&Apache::lonnet::hreflocation($Apache::lonxml::pwd[-1],$value);
if ($href !~ /^http:/) {	if ($href !~ /^https?\:/) {
# IE really wants an extension	# IE really wants an extension
my ($extension) = ($href =~ m/(\.[^.]*)$/);	my ($extension) = ($href =~ m/(\.[^.]*)$/);
$href = &Apache::lonenc::encrypted($href,$force_enc);	$href = &Apache::lonenc::encrypted($href,$force_enc);