--- loncom/interface/lonmeta.pm	2007/01/22 20:04:46	1.202
+++ loncom/interface/lonmeta.pm	2007/01/23 04:25:56	1.203
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Metadata display handler
 #
-# $Id: lonmeta.pm,v 1.202 2007/01/22 20:04:46 raeburn Exp $
+# $Id: lonmeta.pm,v 1.203 2007/01/23 04:25:56 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -638,7 +638,7 @@ sub prettyinput {
             }
              $cur_values_stu =~ s/,$//;
             my @key_order = sort(keys(%meta_options));
-            unshift (@key_order,'');
+            unshift(@key_order,'');
             $meta_options{''} = 'Not specified';
             $meta_options{'select_form_order'} = \@key_order;
         } else {
@@ -1210,7 +1210,12 @@ ENDBOMBS
 <input type="submit" name="clearmsg" value="$clear" />
 ENDDEL
         } else {
-            $r->print('<a href="'.$disuri.'" />'.$goback.'</a>');
+            $r->print('<p><a href="'.$disuri.'" />'.$goback.'</a></p>');
+	    if ($env{'form.clearmsg'}) {
+		my ($diruri) = ($disuri =~ m{(.*/)[^/]*});
+		$r->print('<p><a href="'.$diruri.'" />'.
+			  &mt('Back To Directory').'</a></p>');
+	    }
 	}
 	$r->print('<br />'.$bombs);
     } else {