[LON-CAPA-cvs] cvs: loncom /interface lonprintout.pm

[foxr]

foxr		Mon Jun 26 18:16:09 2006 EDT

  Modified files:              
    /loncom/interface	lonprintout.pm 
  Log:
  Remove some log spew... try for recursive print of sequences.
  
  
Index: loncom/interface/lonprintout.pm
diff -u loncom/interface/lonprintout.pm:1.445 loncom/interface/lonprintout.pm:1.446
--- loncom/interface/lonprintout.pm:1.445	Mon Jun 26 17:53:36 2006
+++ loncom/interface/lonprintout.pm	Mon Jun 26 18:16:06 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.445 2006/06/26 21:53:36 foxr Exp $
+# $Id: lonprintout.pm,v 1.446 2006/06/26 22:16:06 foxr Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1805,9 +1805,9 @@
     }
     #  Fullname may have special latex characters that need \ prefixing:
     #
-    &Apache::lonnet::logthis("Prior to latex escape: $fullname");
+#    &Apache::lonnet::logthis("Prior to latex escape: $fullname");
 #    $fullname = &escape_LaTeX($fullname);
-    &Apache::lonnet::logthis("After escape $fullname");
+#    &Apache::lonnet::logthis("After escape $fullname");
 
     my $i           = 0;
     #goes through all resources, checks if they are available for 
@@ -2548,7 +2548,7 @@
       <nextstate>CHOOSE_FROM_ANY_SEQUENCE</nextstate>
       <filterfunc>return \$res->is_sequence;</filterfunc>
       <valuefunc>return $urlValue;</valuefunc>
-      <choicefunc>return \$res->hasResource(\$res,sub { return !\$_[0]->is_sequence() },0,0);
+      <choicefunc>return \$res->hasResource(\$res,sub { return !\$_[0]->is_sequence() },1,0);
 	</choicefunc>
       </resource>
     </state>