![[BACK]](/icons/back.gif){kind=icon}
Return to lonsyllabus.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface|
Return to lonsyllabus.pm CVS log | Up to [LON-CAPA] / loncom / interface |
| version 1.135, 2013/10/03 12:45:14 | version 1.136, 2014/01/09 15:18:40 |
|---|---|
| Line 1503 sub home_http_host { | Line 1503 sub home_http_host { |
| if ($home ne 'no_host') { | if ($home ne 'no_host') { |
| my $protocol = $Apache::lonnet::protocol{$home}; | my $protocol = $Apache::lonnet::protocol{$home}; |
| $protocol = 'http' if ($protocol ne 'https'); | $protocol = 'http' if ($protocol ne 'https'); |
| return $protocol.'://'.$home; | return $protocol.'://'.&Apache::lonnet::hostname($home); |
| } | } |
| return; | return; |
| } | } |