--- loncom/interface/lonpreferences.pm 2010/09/19 14:22:40 1.179.2.4 +++ loncom/interface/lonpreferences.pm 2010/12/05 22:00:00 1.179.2.5 @@ -1,7 +1,7 @@ # The LearningOnline Network # Preferences # -# $Id: lonpreferences.pm,v 1.179.2.4 2010/09/19 14:22:40 raeburn Exp $ +# $Id: lonpreferences.pm,v 1.179.2.5 2010/12/05 22:00:00 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1909,7 +1909,7 @@ my @menu= }); } - unless ($env{'user.domain'} eq 'gcitest') { + unless ($env{'user.domain'} =~ /^\w+citest$/) { push(@{ $menu[0]->{items} }, { linktext => 'Screen Name', url => '/adm/preferences?action=changescreenname', @@ -1931,7 +1931,7 @@ push(@{ $menu[0]->{items} }, { }); } - unless ((&Apache::loncommon::needs_gci_custom()) || ($env{'user.domain'} eq 'gcitest')) { + unless ((&Apache::loncommon::needs_gci_custom()) || ($env{'user.domain'} =~ /^\w+citest$/)) { push(@{ $menu[1]->{items} }, { linktext => 'Menu Display', url => '/adm/preferences?action=changeicons', @@ -1942,7 +1942,7 @@ push(@{ $menu[0]->{items} }, { }); } - unless ($env{'user.domain'} eq 'gcitest') { + unless ($env{'user.domain'} =~ /^\w+citest$/) { push(@{ $menu[3]->{items} }, { linktext => 'Discussion Display', url => '/adm/preferences?action=changediscussions', @@ -1965,7 +1965,7 @@ push(@{ $menu[4]->{items} }, { }); } - unless ((&Apache::loncommon::needs_gci_custom()) || ($env{'user.domain'} eq 'gcitest')) { + unless ((&Apache::loncommon::needs_gci_custom()) || ($env{'user.domain'} =~ /^\w+citest/)) { if (&Apache::lonnet::allowed('whn',$env{'request.course.id'}) || &Apache::lonnet::allowed('whn',$env{'request.course.id'}.'/' .$env{'request.course.sec'})) {