--- loncom/publisher/lonretrieve.pm	2011/10/31 17:27:10	1.46
+++ loncom/publisher/lonretrieve.pm	2011/11/14 00:20:31	1.47
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to retrieve an old version of a file
 #
-# $Id: lonretrieve.pm,v 1.46 2011/10/31 17:27:10 raeburn Exp $
+# $Id: lonretrieve.pm,v 1.47 2011/11/14 00:20:31 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -202,7 +202,7 @@ sub phaseone {
 	$r->print('<p class="LC_warning">'.&mt('No previous versions published.').'</p>');
     }
 
-    my $dir =  &Apache::loncommon::authorspace()
+    my $dir =  &Apache::loncommon::authorspace($fn)
               .&File::Basename::dirname($fn)
               .'/';
     $r->print('<br />'
@@ -336,7 +336,7 @@ sub handler {
     &Apache::lonhtmlcommon::clear_breadcrumbs();
     &Apache::lonhtmlcommon::add_breadcrumb({
         'text'  => 'Construction Space',
-        'href'  => &Apache::loncommon::authorspace(),
+        'href'  => &Apache::loncommon::authorspace($fn),
     });
     &Apache::lonhtmlcommon::add_breadcrumb({
         'text'  => 'Retrieve previous version',