--- loncom/interface/lonmeta.pm	2003/12/30 14:57:49	1.49
+++ loncom/interface/lonmeta.pm	2003/12/30 20:39:30	1.50
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Metadata display handler
 #
-# $Id: lonmeta.pm,v 1.49 2003/12/30 14:57:49 www Exp $
+# $Id: lonmeta.pm,v 1.50 2003/12/30 20:39:30 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -433,8 +433,8 @@ sub handler {
 # --------------------------------------------------------------- Render Output
 # displayed url
     my ($thisversion)=($uri=~/\.(\d+)\.(\w+)\.meta$/);
+    $uri=~s/\.meta$//;
     my $disuri=&Apache::lonnet::clutter($uri);
-    $disuri=~s/\.meta$//;
     $disuri=&Apache::lonhtmlcommon::crumbs($disuri);
 # version
     my $currentversion=&Apache::lonnet::getversion($disuri);
@@ -526,16 +526,15 @@ ENDHEAD
 		    &prettyprint($dynmeta{$_})."</td></tr>\n");
      }    
       $r->print('</table>');
-      $disuri=~/^(\w+)\/(\w+)\//;   
+      $uri=~/^\/res\/(\w+)\/(\w+)\//; 
       if ((($ENV{'user.domain'} eq $1) && ($ENV{'user.name'} eq $2))
 	  || ($ENV{'user.role.ca./'.$1.'/'.$2})) {
-	  $r->print(
-		    '<h4>'.&mt('Evaluation Comments').' ('.
+	  $r->print('<h4>'.&mt('Evaluation Comments').' ('.
 		    &mt('visible to author and co-authors only').')</h4>'.
 		    '<blockquote>'.$dynmeta{'comments'}.'</blockquote>');
 	  $r->print('<h4>'.&mt('Error Messages').' ('.
 		    &mt('visible to author and co-authors only').')</h4>'.
-		    &Apache::lonmsg::retrieve_author_res_msg($2,$1,$disuri));
+		    &Apache::lonmsg::retrieve_author_res_msg($2,$1,$uri));
       }
 # ------------------------------------------------------------- All other stuff
       $r->print(