![[BACK]](/icons/back.gif){kind=icon}
Return to printout.pl CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface|
Return to printout.pl CVS log | Up to [LON-CAPA] / loncom / interface |
| version 1.25, 2003/05/28 21:25:33 | version 1.26, 2003/06/04 23:38:14 |
|---|---|
| Line 13 function LONCAPAstale() { | Line 13 function LONCAPAstale() { |
| } | } |
| </script> | </script> |
| ENDSCRIPT | ENDSCRIPT |
| print "<body bgcolor='#FFFFFF' onLoad='LONCAPAreg();' onUnload='LONCAPAstate()'>\n"; | print "<body bgcolor='#FFFFFF' onLoad='LONCAPAreg();' onUnload='LONCAPAstale()'>\n"; |
| my ($texfile,$laystyle,$numberofcolumns,$selectionmade) = split(/&/,$ENV{'QUERY_STRING'}); | my ($texfile,$laystyle,$numberofcolumns,$selectionmade) = split(/&/,$ENV{'QUERY_STRING'}); |
| my $figfile = $texfile; | my $figfile = $texfile; |
| $figfile =~ s/^([^\.]+printout)[^t]+\.tex/$1\.dat/; | $figfile =~ s/^([^\.]+printout)[^t]+\.tex/$1\.dat/; |