--- loncom/interface/printout.pl	2003/07/24 14:57:54	1.31
+++ loncom/interface/printout.pl	2003/08/14 14:46:52	1.33
@@ -49,6 +49,13 @@ use Image::Magick;
       my $path_file = $1.'/';
       chdir $path_file;
       system("latex $name_file 1>/dev/null 2>/dev/null");
+      if ($selectionmade>=10) {system("latex $name_file 1>/dev/null 2>/dev/null");} #to create table of contents
+      my $idxname=$name_file;
+      $idxname=~s/\.tex$/\.idx/;
+      if ($selectionmade>=100) {
+	  system("makeindex $idxname");
+	  system("latex $name_file 1>/dev/null 2>/dev/null");
+      } #to create index
       #Do we have a latex error in the log file?
       my $logfilename = $texfile;
       $logfilename =~ s/\.tex$/\.log/;