--- loncom/interface/domainprefs.pm 2012/12/20 13:15:36 1.180
+++ loncom/interface/domainprefs.pm 2012/12/20 13:23:49 1.181
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to set domain-wide configuration settings
#
-# $Id: domainprefs.pm,v 1.180 2012/12/20 13:15:36 raeburn Exp $
+# $Id: domainprefs.pm,v 1.181 2012/12/20 13:23:49 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -436,22 +436,25 @@ sub handler {
my ($configuserok,$author_ok,$switchserver) =
&config_check($dom,$confname,$servadm);
unless ($configuserok eq 'ok') {
- &Apache::lonconfigsettings::print_header($r,$phase,$context).
- &mt('The domain configuration user "[_1]" has yet to be created.',
- $confname).
- '
';
+ &Apache::lonconfigsettings::print_header($r,$phase,$context);
+ $r->print(&mt('The domain configuration user "[_1]" has yet to be created.',
+ $confname).
+ '
'
+ );
if ($switchserver) {
- &mt('Ordinarily, that domain configuration user is created when the ./UPDATE script is run to install LON-CAPA for the first time.').
- '
'.
- &mt('However, that does not apply when new domains are added to a multi-domain server, and ./UPDATE has not been run recently.').
- '
'.
- &mt('The "[_1]" user can be created automatically when a Domain Coordinator visits the web-based "Set domain configuration" screen, in a session hosted on the primary library server.',$confname).
- '
'.
- &mt("To do that now, use the following link: [_1],$switchserver);
+ $r->print(&mt('Ordinarily, that domain configuration user is created when the ./UPDATE script is run to install LON-CAPA for the first time.').
+ '
'.
+ &mt('However, that does not apply when new domains are added to a multi-domain server, and ./UPDATE has not been run recently.').
+ '
'.
+ &mt('The "[_1]" user can be created automatically when a Domain Coordinator visits the web-based "Set domain configuration" screen, in a session hosted on the primary library server.',$confname).
+ '
'.
+ &mt('To do that now, use the following link: [_1]',$switchserver)
+ );
} else {
- &mt('To create that user from the command line run the ./UPDATE script found in the top level directory of the extracted LON-CAPA tarball.').
- '
'.
- &mt('Once that is done, you will be able to use the web-based "Set domain configuration" to configure the domain');
+ $r->print(&mt('To create that user from the command line run the ./UPDATE script found in the top level directory of the extracted LON-CAPA tarball.').
+ '
'.
+ &mt('Once that is done, you will be able to use the web-based "Set domain configuration" to configure the domain')
+ );
}
$r->print(&Apache::loncommon::end_page());
return OK;