|
version 1.339, 2009/02/10 14:23:18
|
version 1.340, 2009/02/12 11:35:07
|
|
Line 1899 END
|
Line 1899 END
|
| } |
} |
| |
|
| my $orig_url = $url; |
my $orig_url = $url; |
| |
$orig_url=~s{http(:|:)//https(:|:)//}{https$2//}; |
| my $external = ($url=~s{^http(|s)(:|:)//}{/adm/wrapper/ext/}); |
my $external = ($url=~s{^http(|s)(:|:)//}{/adm/wrapper/ext/}); |
| if ((!$isfolder) && ($residx) && ($folder!~/supplemental/) && (!$ispage)) { |
if ((!$isfolder) && ($residx) && ($folder!~/supplemental/) && (!$ispage)) { |
| my $symb=&Apache::lonnet::symbclean( |
my $symb=&Apache::lonnet::symbclean( |
![[BACK]](/icons/back.gif){kind=icon}
Return to londocs.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface