[LON-CAPA-cvs] cvs: loncom(GCI_2) /homework structuretags.pm

[www]

www		Fri Nov 27 21:20:45 2009 EDT

  Modified files:              (Branch: GCI_2)
    /loncom/homework	structuretags.pm 
  Log:
  Hoping that this actually branched.
  
  For GCI, there is no randomization.
  
  
Index: loncom/homework/structuretags.pm
diff -u loncom/homework/structuretags.pm:1.444.4.2 loncom/homework/structuretags.pm:1.444.4.2.2.1
--- loncom/homework/structuretags.pm:1.444.4.2	Fri Aug 14 12:32:04 2009
+++ loncom/homework/structuretags.pm	Fri Nov 27 21:20:44 2009
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA 
 # definition of tags that give a structure to a document
 #
-# $Id: structuretags.pm,v 1.444.4.2 2009/08/14 12:32:04 raeburn Exp $
+# $Id: structuretags.pm,v 1.444.4.2.2.1 2009/11/27 21:20:44 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -237,17 +237,17 @@
     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) {
-            $page_start .= '<p class="LC_info">'
-                          .&mt('Browsing resource, all submissions are temporary.')
-                          .'</p>';
-        }
-    }
+#    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 .= '<p class="LC_info">'
+#                          .&mt('Browsing resource, all submissions are temporary.')
+#                          .'</p>';
+#       }
+#    }
 
     if (!defined($found{'body'}) && $env{'request.state'} ne 'construct') {
 	$page_start .= &Apache::lonxml::message_location();
@@ -894,25 +894,26 @@
 	if ($env{'request.state'} ne "construct" && 
 	    ($symb eq '' || $Apache::lonhomework::type eq 'practice')) {
 	    $form_tag_start.='<input type="hidden" name="rndseed" value="'.
-		$rndseed.'" />'.
-		    '<input type="submit" name="resetdata"
-                             value="'.&mt('New Problem Variation').'" />';
+		$rndseed.'" />';
+#.
+#		    '<input type="submit" name="resetdata"
+#                             value="'.&mt('New Problem Variation').'" />';
 	    if (exists($env{'form.username'})) {
 		$form_tag_start.=
 		    '<input type="hidden" name="username"
                              value="'.$env{'form.username'}.'" />';
 	    }
-            if ($env{'request.role.adv'}) {
-                $form_tag_start.= ' <label class="LC_nobreak">'
-                         .'<input type="checkbox" name="showallfoils"';
-                if (defined($env{'form.showallfoils'})) {
-                    $form_tag_start.=' checked="checked"';
-                }
-                $form_tag_start.= ' /> '
-                                 .&mt('Show All Foils')
-                                 .'</label>';
-
-	    }
+#            if ($env{'request.role.adv'}) {
+#                $form_tag_start.= ' <label class="LC_nobreak">'
+#                         .'<input type="checkbox" name="showallfoils"';
+#                if (defined($env{'form.showallfoils'})) {
+#                    $form_tag_start.=' checked="checked"';
+#                }
+#                $form_tag_start.= ' /> '
+#                                 .&mt('Show All Foils')
+#                                 .'</label>';
+#
+#	    }
             if ($Apache::lonhomework::type eq 'practice') {
                 $form_tag_start.=&practice_problem_header();
             }