--- loncom/automation/batchcreatecourse.pm	2006/08/11 22:08:06	1.18
+++ loncom/automation/batchcreatecourse.pm	2007/03/03 01:40:38	1.20
@@ -1,5 +1,5 @@
 #
-# $Id: batchcreatecourse.pm,v 1.18 2006/08/11 22:08:06 albertel Exp $
+# $Id: batchcreatecourse.pm,v 1.20 2007/03/03 01:40:38 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -79,7 +79,7 @@ use strict;
 # <setpolicy>1</setpolicy>
 # <setcontent>1</setcontent>
 # <setkeys>0</setkeys>
-# <keyauth>keyadmin@msu</keyauth>
+# <keyauth>keyadmin:msu</keyauth>
 # <disresdis>1</disresdis>
 # <disablechat>1</disablechat>
 # <openall></openall>
@@ -489,7 +489,7 @@ sub build_course {
                firstres => $firstres
                };
 
-        my %host_servers = &Apache::loncommon::get_library_servers($cdom);
+        my %host_servers = &Apache::lonnet::get_servers($cdom,'library');
         if (! exists($host_servers{$$details{$num}{'coursehome'}})) {
             $$logmsg .= &mt('Invalid home server for course').': '.$$details{$num}{'coursehome'};
             return;