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

sakharuk lon-capa-cvs@mail.lon-capa.org
Tue, 20 Aug 2002 14:42:22 -0000


sakharuk		Tue Aug 20 10:42:22 2002 EDT

  Modified files:              
    /loncom/homework	structuretags.pm 
  Log:
  Hint in postanswerdate now starts from the new line.
  
  
Index: loncom/homework/structuretags.pm
diff -u loncom/homework/structuretags.pm:1.103 loncom/homework/structuretags.pm:1.104
--- loncom/homework/structuretags.pm:1.103	Wed Aug  7 13:24:35 2002
+++ loncom/homework/structuretags.pm	Tue Aug 20 10:42:22 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.103 2002/08/07 17:24:35 sakharuk Exp $
+# $Id: structuretags.pm,v 1.104 2002/08/20 14:42:22 sakharuk Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -306,10 +306,13 @@
         chomp $due_file_content;
         if ($due_file_content ne $duedate) {	    
 	$temp_file = Apache::File->new('>'.$filename); 
-	    print $temp_file "$duedate\n";
-	    if($duedate eq 'Wed 31 Dec 1969 07:00:00 PM EDT') {$duedate = '';}	    
+	    print $temp_file "$duedate\n";	    
 	    if (not $ENV{'request.symb'} =~ m/\.page_/) {
-		$result .= '\begin{document} \noindent\textit{Due date: '.$duedate.'} \vskip 1 mm';	
+		if(not $duedate=~m/1969/) {
+		    $result .= '\begin{document} \noindent\textit{Due date: '.$duedate.'} \vskip 1 mm';	
+		} else {
+		    $result .= '\begin{document} \noindent \vskip 1 mm';
+		}
 	    } else {
 		$result .= '\parbox{\minipagewidth}{\vskip 1mm\textit{Due date: '.$duedate.'} \\\\\\\\';
 	    } 
@@ -623,6 +626,8 @@
     if ($Apache::inputtags::status['-1'] ne 'SHOW_ANSWER') {
       &Apache::lonxml::get_all_text("/postanswerdate",$$parser[$#$parser]);
     }
+  } elsif ($target eq 'tex') {
+      return '\vskip 0 mm \noindent';
   }
   return '';
 }