--- loncom/homework/structuretags.pm 2009/05/02 22:18:24 1.443
+++ loncom/homework/structuretags.pm 2009/12/02 18:22:12 1.444.4.2.2.2
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# definition of tags that give a structure to a document
#
-# $Id: structuretags.pm,v 1.443 2009/05/02 22:18:24 foxr Exp $
+# $Id: structuretags.pm,v 1.444.4.2.2.2 2009/12/02 18:22:12 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -236,17 +236,18 @@ sub page_start {
$body_args{'no_auto_mt_title'} = 1;
my $page_start = &Apache::loncommon::start_page($name,$extra_head,
\%body_args);
-
- if (!defined($found{'body'})
- && $env{'request.state'} ne 'construct'
- && ($target eq 'web' || $target eq 'webgrade')) {
-
- my ($symb,undef,undef,undef,$publicuser)= &Apache::lonnet::whichuser();
- if ($symb eq '' && !$publicuser) {
- my $help = &Apache::loncommon::help_open_topic("Ambiguous_Reference");
- $help=&mt("Browsing resource, all submissions are temporary.")."
";
- $page_start .= $help;
- }
+ unless ($env{'request.gcicontext'} eq 'buildtest') {
+ if (!defined($found{'body'})
+ && $env{'request.state'} ne 'construct'
+ && ($target eq 'web' || $target eq 'webgrade')) {
+
+ my ($symb,undef,undef,undef,$publicuser)= &Apache::lonnet::whichuser();
+ if ($symb eq '' && !$publicuser) {
+ $page_start .= '
' + .&mt('Browsing resource, all submissions are temporary.') + .'
'; + } + } } if (!defined($found{'body'}) && $env{'request.state'} ne 'construct') { @@ -418,14 +419,16 @@ sub problem_web_to_edit_header { ''; } - my $show_all_foils_text = - ($Apache::lonhomework::parsing_a_task) ? - &mt(' Show All Instances') - : &mt(' Show All Foils'); + my $show_all_foils_text = + ($Apache::lonhomework::parsing_a_task) ? + &mt('Show All Instances') + : &mt('Show All Foils'); - my $show_all= ''; + $show_all.= ' /> '.$show_all_foils_text + .''; @@ -674,10 +677,8 @@ sub checkout_msg { return (<$lt{'id_expln'}
- -$lt{'warning'}
- - @@ -711,7 +712,7 @@ sub firstaccess_msg { my $buttontext = &mt('Show Resource'); my $timertext = &mt('Start Timer?'); $result .= (<