loncom/build/make_domain_coordinator.pl - diff

Return to make_domain_coordinator.pl CVS log

Up to [LON-CAPA] / loncom / build

version 1.27, 2015/01/03 02:45:22	version 1.28, 2021/01/08 00:38:07
Line 97 use Apache::lonnet;	Line 97 use Apache::lonnet;
use Apache::lonlocal;	use Apache::lonlocal;
use DBI;	use DBI;
use Storable qw(nfreeze);	use Storable qw(nfreeze);
	use Sys::Hostname::FQDN();
use strict;	use strict;

=pod	=pod
Line 539 by going to http://MACHINENAME/adm/creat	Line 540 by going to http://MACHINENAME/adm/creat

# Output success message, and inform sysadmin about how to further proceed.	# Output success message, and inform sysadmin about how to further proceed.
print("\n".&mt('[_1] is now a domain coordinator',$username)."\n"); # Output success message.	print("\n".&mt('[_1] is now a domain coordinator',$username)."\n"); # Output success message.
my $hostname=`hostname`; chomp($hostname); # Read in hostname.	my $hostname = Sys::Hostname::FQDN::fqdn(); # Read in hostname.
print("\n".	print("\n".
&mt('Once LON-CAPA is running, you should log-in and use: [_1] to further define this user.',	&mt('Once LON-CAPA is running, you should log-in and use: [_1] to further define this user.',
"\nhttp://$hostname/adm/createuser\n")."\n\n".	"\nhttp://$hostname/adm/createuser\n")."\n\n".