--- loncom/build/make_domain_coordinator.pl	2002/03/02 03:49:18	1.1
+++ loncom/build/make_domain_coordinator.pl	2002/06/10 01:50:16	1.4
@@ -6,6 +6,40 @@
 
 make_domain_coordinator.pl - Make a domain coordinator on a LON-CAPA system
 
+=cut
+
+# The LearningOnline Network
+# make_domain_coordinator.pl - Make a domain coordinator on a system
+#
+# $Id: make_domain_coordinator.pl,v 1.4 2002/06/10 01:50:16 harris41 Exp $
+#
+# This file is part of the LearningOnline Network with CAPA (LON-CAPA).
+#
+# LON-CAPA is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# LON-CAPA is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with LON-CAPA; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+#
+# /home/httpd/html/adm/gpl.txt
+#
+# http://www.lon-capa.org/
+#
+# YEAR=2002
+# 3/1,3/3,3/4 Scott Harrison
+#
+###
+
+=pod
+
 =head1 DESCRIPTION
 
 Automates the steps for domain coordinator creation.  This
@@ -44,36 +78,6 @@ Set roles.hist and roles.db
 
 =cut
 
-# The LearningOnline Network
-# make_domain_coordinator.pl - Make a domain coordinator on a system
-#
-# $Id: make_domain_coordinator.pl,v 1.1 2002/03/02 03:49:18 harris41 Exp $
-#
-# Copyright Michigan State University Board of Trustees
-#
-# This file is part of the LearningOnline Network with CAPA (LON-CAPA).
-#
-# LON-CAPA is free software; you can redistribute it and/or modify
-# it under the terms of the GNU General Public License as published by
-# the Free Software Foundation; either version 2 of the License, or
-# (at your option) any later version.
-#
-# LON-CAPA is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-# GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License
-# along with LON-CAPA; if not, write to the Free Software
-# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-#
-# /home/httpd/html/adm/gpl.txt
-#
-# http://www.lon-capa.org/
-#
-# YEAR=2002
-# 3/1 Scott Harrison
-
 # NOTE: I am interspersing the manual procedure with the automation.
 # To see the manual procedure, do perldoc ./make_domain_coordinator.pl
 
@@ -97,15 +101,16 @@ There are no flags to this script.
 
 usage: make_domain_coordinator.pl [USERNAME] [DOMAIN] 
 
-The password is accepted through standard input.
+The password is accepted through standard input
+and should only consist of printable ASCII
+characters and be a string of length greater than 5 characters.
 
 The first argument
 specifies the user name of the domain coordinator and
 should consist of only alphanumeric characters.
 
-The second argument specifies the password for the domain
-coordinator and should only consist of printable ASCII
-characters and be a string of length greater than 5 characters.
+The second argument specifies the domain of the computer
+coordinator and should consist of only alphanumeric characters.
 
 =cut
 
@@ -125,6 +130,7 @@ unless ($domain=~/^\w+$/ and $domain!~/\
 	"\n";
 }
 
+print "Password: "; $|=0;
 my $passwd=<>; # read in password from standard input
 chomp($passwd);
 
@@ -317,7 +323,7 @@ sub propath {
 
 =pod
 
-AUTHOR
+=head1 AUTHOR
 
 Scott Harrison, harris41@msu.edu