--- loncom/interface/lonmeta.pm	2004/04/14 16:14:29	1.67
+++ loncom/interface/lonmeta.pm	2004/04/14 18:30:36	1.68
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Metadata display handler
 #
-# $Id: lonmeta.pm,v 1.67 2004/04/14 16:14:29 matthew Exp $
+# $Id: lonmeta.pm,v 1.68 2004/04/14 18:30:36 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -541,13 +541,16 @@ $table
 </table>
 ENDHEAD
     if ($ENV{'user.adv'}) {
-        &print_dynamic_metadata($r,$uri);
+        &print_dynamic_metadata($r,$uri,\%content);
     }
     return;
 }
 
 sub print_dynamic_metadata {
-    my ($r,$uri) = @_;
+    my ($r,$uri,$content) = @_;
+    #
+    my %content = \$content;
+    my %lt=&fieldnames();
     #
     my $description = 'Dynamic Metadata (updated periodically)';
     $r->print('<h3>'.&mt($description).'</h3>'.
@@ -747,30 +750,5 @@ ENDEDIT
     return;
 }
 
-##############################################################
-##############################################################
-# MySQL table columns
-
-my @columns;
-
-BEGIN {
-    # Get columns of MySQL metadata table
-    @columns=&Apache::lonmysql::col_order('metadata');
-}
-
-#
-# Turn MySQL row into hash
-#     This routine should be moved to lonmetadata
-#     a more generic place since it has nothing to do with metadata
-sub metadata_col_to_hash {
-    my @cols=@_;
-    my %hash=();
-    for (my $i=0; $i<=$#columns; $i++) {
-	$hash{$columns[$i]}=$cols[$i];
-    }
-    return %hash;
-}
-
-
 1;
 __END__