--- loncom/interface/lonmeta.pm 2007/01/19 14:23:23 1.201 +++ loncom/interface/lonmeta.pm 2007/03/12 19:10:48 1.204 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Metadata display handler # -# $Id: lonmeta.pm,v 1.201 2007/01/19 14:23:23 raeburn Exp $ +# $Id: lonmeta.pm,v 1.204 2007/03/12 19:10:48 banghart Exp $ # # Copyright Michigan State University Board of Trustees # @@ -636,8 +636,9 @@ 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 { @@ -803,8 +804,10 @@ sub handler { &present_editable_metadata($r,$uri,'groups'); } elsif ($uri=~m|^/~|) { # Construction space - $r->print(&Apache::loncommon::start_page('Edit Catalog nformation', - undef, + $r->print(&Apache::loncommon::start_page('Edit Catalog Information', + "\n".'', {'domain' => $resdomain,})); &present_editable_metadata($r,$uri); } else { @@ -1209,7 +1212,12 @@ ENDBOMBS ENDDEL } else { - $r->print(''.$goback.''); + $r->print('

'.$goback.'

'); + if ($env{'form.clearmsg'}) { + my ($diruri) = ($disuri =~ m{(.*/)[^/]*}); + $r->print('

'. + &mt('Back To Directory').'

'); + } } $r->print('
'.$bombs); } else { @@ -1249,9 +1257,6 @@ ENDDEL

$displayfile

ENDEDIT - $r->print(''); my %lt=&fieldnames($file_type); my $output; my @fields;