--- loncom/interface/lonpopulate.pm	2013/08/16 03:25:05	1.79
+++ loncom/interface/lonpopulate.pm	2013/12/24 19:15:11	1.80
@@ -1,5 +1,5 @@
 # automated enrollment configuration handler
-# $Id: lonpopulate.pm,v 1.79 2013/08/16 03:25:05 raeburn Exp $
+# $Id: lonpopulate.pm,v 1.80 2013/12/24 19:15:11 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2726,20 +2726,24 @@ sub print_update_result {
     my %settings = 
         &Apache::lonnet::get('environment',
             ['internal.coursecode','internal.sectionnums','internal.crosslistings',
-             'internal.authtype','internal.autharg','internal.showphoto','internal.defaultcredits'],
+             'internal.authtype','internal.autharg','internal.showphoto','internal.defaultcredits',
+             'internal.textbook'],
             $dom,$crs);
     my $coursecode = $settings{'internal.coursecode'};
     my $authtype = $settings{'internal.authtype'};
     my $autharg = $settings{'internal.autharg'};
     my $showphotos = $settings{'internal.showphoto'};
+    my $textbook = $settings{'internal.textbook'};
     my ($showcredits,$defaultcredits);
     my %domdefaults = &Apache::lonnet::get_domain_defaults($dom);
-    if ($domdefaults{'officialcredits'} || $domdefaults{'unofficialcredits'}) {
+    if ($domdefaults{'officialcredits'} || $domdefaults{'unofficialcredits'} || $domdefaults{'textbookcredits'}) {
         $showcredits = 1;
         $defaultcredits = $settings{'internal.defaultcredits'};
         if ($defaultcredits eq '') {
             if ($coursecode ne '') {
                 $defaultcredits = $domdefaults{'officialcredits'};   
+            } elsif ($textbook ne '') {
+                $defaultcredits = $domdefaults{'textbookcredits'};
             } else {
                 $defaultcredits = $domdefaults{'unofficialcredits'};
             }