--- loncom/publisher/lonretrieve.pm	2004/03/11 22:45:06	1.24
+++ loncom/publisher/lonretrieve.pm	2004/07/02 09:41:07	1.25
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to retrieve an old version of a file
 #
-# $Id: lonretrieve.pm,v 1.24 2004/03/11 22:45:06 albertel Exp $
+# $Id: lonretrieve.pm,v 1.25 2004/07/02 09:41:07 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -123,6 +123,8 @@ sub phaseone {
 } else {
     $r->print('<h3>'.&mt('No previous versions published.').'</h3>');
 }
+    $r->print('<p><a href="/priv/'.$uname.$fn.'">'.&mt('Back to').' '.$fn.
+	      '</a></p>'); 
 }
 
 # ---------------------------------- Interface for presenting specified version