--- loncom/interface/domainprefs.pm	2007/03/01 18:03:18	1.3
+++ loncom/interface/domainprefs.pm	2007/03/08 01:58:44	1.5
@@ -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.5 2007/03/08 01:58:44 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -47,7 +47,7 @@ sub handler {
     }
 
     my $dom = $env{'request.role.domain'};
-    my $domdesc = $Apache::lonnet::domaindescription{$dom};
+    my $domdesc = &Apache::lonnet::domain($dom,'description');
     if (&Apache::lonnet::allowed('mau',$dom)) {
         &Apache::loncommon::content_type($r,'text/html');
         $r->send_http_header;
@@ -502,7 +502,8 @@ sub modify_login {
                   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 @@ sub modify_autoenroll {
 
                                 }
                      );
-    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'}) {