[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'}) {