[LON-CAPA-cvs] cvs: loncom /interface domainprefs.pm
raeburn
lon-capa-cvs@mail.lon-capa.org
Thu, 01 Mar 2007 18:24:09 -0000
raeburn Thu Mar 1 13:24:09 2007 EDT
Modified files:
/loncom/interface domainprefs.pm
Log:
Adding two missing <CR>s.
Index: loncom/interface/domainprefs.pm
diff -u loncom/interface/domainprefs.pm:1.3 loncom/interface/domainprefs.pm:1.4
--- loncom/interface/domainprefs.pm:1.3 Thu Mar 1 13:03:18 2007
+++ loncom/interface/domainprefs.pm Thu Mar 1 13:24:09 2007
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to set domain-wide configuration settings
#
-# $Id: domainprefs.pm,v 1.3 2007/03/01 18:03:18 raeburn Exp $
+# $Id: domainprefs.pm,v 1.4 2007/03/01 18:24:09 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -502,7 +502,8 @@
adminmail => 'Display administrator E-mail address');
my @offon = ('off','on');
my %loginhash = (
- login => { coursecatalog => $env{'form.coursecatalog'}, adminmail => $env{'form.adminmail'},
+ login => { coursecatalog => $env{'form.coursecatalog'},
+ adminmail => $env{'form.adminmail'},
}
);
my $putresult = &Apache::lonnet::put_dom('configuration',\%loginhash,
@@ -609,7 +610,8 @@
}
);
- my $putresult = &Apache::lonnet::put_dom('configuration',\%autoenrollhash, $dom);
+ my $putresult = &Apache::lonnet::put_dom('configuration',\%autoenrollhash,
+ $dom);
if ($putresult eq 'ok') {
if (exists($currautoenroll{'run'})) {
if ($currautoenroll{'run'} ne $env{'form.autoenroll_run'}) {