--- loncom/publisher/londiff.pm	2002/10/18 13:48:57	1.10
+++ loncom/publisher/londiff.pm	2003/08/13 15:20:11	1.12
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to show differences between file versions
 #
-# $Id: londiff.pm,v 1.10 2002/10/18 13:48:57 www Exp $
+# $Id: londiff.pm,v 1.12 2003/08/13 15:20:11 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -41,7 +41,6 @@
 # 03/31,04/03 Gerd Kortemeyer)
 #
 # 05/02/01,05/09 Gerd Kortemeyer
-# 12/13 Scott Harrison
 #
 ###
 
@@ -190,7 +189,7 @@ sub handler {
 } else {
     $r->print('<h1><font color=red>Binary File</font></h1>');
 }
-  $r->print('</body></html>');
+  $r->print('<center><a href="javascript:window.close();">Close This Window</a></center></body></html>'); 
   return OK;  
 }