--- loncom/interface/domainprefs.pm 2007/04/10 21:40:12 1.10
+++ loncom/interface/domainprefs.pm 2007/04/12 20:33:31 1.11
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to set domain-wide configuration settings
#
-# $Id: domainprefs.pm,v 1.10 2007/04/10 21:40:12 albertel Exp $
+# $Id: domainprefs.pm,v 1.11 2007/04/12 20:33:31 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -951,7 +951,8 @@ sub modify_login {
$resulttext = &mt('No changes made to log-in page settings');
}
} else {
- $resulttext = &mt('An error occurred: [_1]',$putresult);
+ $resulttext = ''.
+ &mt('An error occurred: [_1]',$putresult).'';
}
if ($errors) {
$resulttext .= '
'.&mt('The following errors occurred: ').'
'.
@@ -993,7 +994,8 @@ sub modify_rolecolors {
$resulttext = &mt('No changes made to default color schemes');
}
} else {
- $resulttext = &mt('An error occurred: [_1]',$putresult);
+ $resulttext = ''.
+ &mt('An error occurred: [_1]',$putresult).'';
}
if ($errors) {
$resulttext .= &mt('The following errors occurred: ').''.
@@ -1046,7 +1048,7 @@ sub modify_colors {
$confhash->{$role}{$img} = $logourl;
$changes{$role}{$img} = 1;
} else {
- $error = &mt("Upload of image [_1] for $role page(s) failed because an error occurred publshing the file in RES space. Error was: [_2].",$img,$result);
+ $error = &mt("Upload of image [_1] for $role page(s) failed because an error occurred publishing the file in RES space. Error was: [_2].",$img,$result);
}
} else {
$error = &mt("Upload of image [_1] for $role page(s) failed because an author role could not be assigned to a Domain Configuation user ([_2]) in domain: [_3]. Error was: [_4].",$img,$confname,$dom,$author_ok);
@@ -1057,7 +1059,7 @@ sub modify_colors {
}
if ($error) {
&Apache::lonnet::logthis($error);
- $errors .= '- '.$error.'
';
+ $errors .= '- '.$error.'
';
}
} elsif ($domconfig->{$role}{$img} ne '') {
if ($domconfig->{$role}{$img} !~ m-^(/res/\Q$dom\E/\Q$confname\E/\Q$img\E)/([^/]+)$-) {
@@ -1506,7 +1508,8 @@ sub modify_quotas {
$resulttext = &mt('No changes made to default quotas');
}
} else {
- $resulttext = &mt('An error occurred: [_1]',$putresult);
+ $resulttext = ''.
+ &mt('An error occurred: [_1]',$putresult).'';
}
return $resulttext;
}
@@ -1570,7 +1573,8 @@ sub modify_autoenroll {
$resulttext = &mt('No changes made to auto-enrollment settings');
}
} else {
- $resulttext = &mt('An error occurred: [_1]',$putresult);
+ $resulttext = ''.
+ &mt('An error occurred: [_1]',$putresult).'';
}
return $resulttext;
}
@@ -1689,7 +1693,8 @@ sub modify_autoupdate {
$resulttext = &mt('No changes made to autoupdates');
}
} else {
- $resulttext = &mt('An error occurred: [_1]',$putresult);
+ $resulttext = ''.
+ &mt('An error occurred: [_1]',$putresult).'';
}
return $resulttext;
}