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

sakharuk lon-capa-cvs@mail.lon-capa.org
Wed, 24 Jul 2002 20:34:52 -0000


sakharuk		Wed Jul 24 16:34:52 2002 EDT

  Modified files:              
    /loncom/homework	structuretags.pm 
  Log:
  Added one blank space after </tex> to correct a few LaTeX errors in Ray's
  problema.
  
  
Index: loncom/homework/structuretags.pm
diff -u loncom/homework/structuretags.pm:1.101 loncom/homework/structuretags.pm:1.102
--- loncom/homework/structuretags.pm:1.101	Wed Jul  3 11:36:40 2002
+++ loncom/homework/structuretags.pm	Wed Jul 24 16:34:52 2002
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA 
 # definition of tags that give a structure to a document
 #
-# $Id: structuretags.pm,v 1.101 2002/07/03 15:36:40 sakharuk Exp $
+# $Id: structuretags.pm,v 1.102 2002/07/24 20:34:52 sakharuk Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -57,7 +57,7 @@
   my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_;
   my $bodytext=&Apache::lonxml::get_all_text("/tex",$$parser[$#$parser]);
   if ($target eq 'tex') {
-    return $bodytext
+      return $bodytext.' ';
   }
   return '';
 }
@@ -300,7 +300,8 @@
         chomp $due_file_content;
         if ($due_file_content ne $duedate) {	    
 	$temp_file = Apache::File->new('>'.$filename); 
-	    print $temp_file "$duedate\n";	    
+	    print $temp_file "$duedate\n";
+	    if($duedate eq 'Wed 31 Dec 1969 07:00:00 PM EDT') {$duedate = '';}	    
 	    if (not $ENV{'request.symb'} =~ m/\.page_/) {
 		$result .= '\begin{document} \noindent\textit{Due date: '.$duedate.'} \vskip 1 mm';	
 	    } else {