--- loncom/interface/loncreateuser.pm	2014/06/13 11:22:41	1.402
+++ loncom/interface/loncreateuser.pm	2014/06/30 14:49:35	1.403
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Create a user
 #
-# $Id: loncreateuser.pm,v 1.402 2014/06/13 11:22:41 raeburn Exp $
+# $Id: loncreateuser.pm,v 1.403 2014/06/30 14:49:35 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3044,7 +3044,7 @@ sub update_user_data {
                         my %newenvhash;
                         foreach my $key (keys(%changed)) {
                             if (($key eq 'official') || ($key eq 'unofficial')
-                                || ($key eq 'community')) {
+                                || ($key eq 'community') || ($key eq 'textbook')) {
                                 $newenvhash{'environment.requestcourses.'.$key} =
                                     $changeHash{'requestcourses.'.$key};
                                 if ($changeHash{'requestcourses.'.$key}) {