--- loncom/interface/loncommon.pm 2007/03/01 02:33:04 1.510 +++ loncom/interface/loncommon.pm 2007/03/02 23:17:58 1.511 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.510 2007/03/01 02:33:04 albertel Exp $ +# $Id: loncommon.pm,v 1.511 2007/03/02 23:17:58 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1489,7 +1489,7 @@ sub get_library_servers { my %library_servers; foreach my $hostid (keys(%Apache::lonnet::libserv)) { if ($Apache::lonnet::hostdom{$hostid} eq $domain) { - $library_servers{$hostid} = $Apache::lonnet::hostname{$hostid}; + $library_servers{$hostid} = &Apache::lonnet::hostname($hostid); } } return %library_servers;