[LON-CAPA-cvs] cvs: modules /sharrison/fomtools fomfix.pl

[harris41]

harris41		Sat Jul 27 17:51:51 2002 EDT

  Modified files:              
    /modules/sharrison/fomtools	fomfix.pl 
  Log:
  very important not to have a blank line appended
  
  
Index: modules/sharrison/fomtools/fomfix.pl
diff -u modules/sharrison/fomtools/fomfix.pl:1.1 modules/sharrison/fomtools/fomfix.pl:1.2
--- modules/sharrison/fomtools/fomfix.pl:1.1	Sat Jul 27 17:40:54 2002
+++ modules/sharrison/fomtools/fomfix.pl	Sat Jul 27 17:51:51 2002
@@ -66,9 +66,7 @@
     }
     close(IN);
     open(OUT,">$tmpdir/$file");
-    print(OUT <<END);
-$newstring
-END
+    print(OUT $newstring);
     close(OUT);
     system("diff $tmpdir/$file $itemsdir/$file | grep -q HideAttributions") or
 	`cp -v $tmpdir/$file $itemsdir/$file`;