Index: openacs-4/packages/lorsm/www/admin/md/metamd/meta_cata.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/admin/md/metamd/meta_cata.tcl,v
diff -u -N -r1.4 -r1.4.2.1
--- openacs-4/packages/lorsm/www/admin/md/metamd/meta_cata.tcl	12 Dec 2008 14:25:38 -0000	1.4
+++ openacs-4/packages/lorsm/www/admin/md/metamd/meta_cata.tcl	16 Apr 2010 21:41:40 -0000	1.4.2.1
@@ -20,23 +20,19 @@
 # set context & title
 if { ![ad_form_new_p -key ims_md_md_cata_id]} {
     set context [list \
-                    [list   [export_vars -base ".." ims_md_id] \
-                            "IMS Metadata Editor"] \
-
-                    [list   [export_vars -base "../metamd" im\s_md_id] \
-                            "Meta Metadata"] \
-
-                    "Edit Catalog-Entry"]
+                     [list   [export_vars -base ".." ims_md_id] \
+                          "IMS Metadata Editor"] \
+                     [list   [export_vars -base "../metamd" ims_md_id] \
+                          "Meta Metadata"] \
+                     "Edit Catalog-Entry"]
     set title "Edit Meta MD Catalog-Entry"
 } else {
     set context [list \
-                    [list   [export_vars -base ".." ims_md_id] \
-                            "IMS Metadata Editor"] \
-
-                    [list   [export_vars -base "../metamd" im\s_md_id] \
-                            "Meta Metadata"] \
-
-                    "Add Catalog-Entry"]
+                     [list   [export_vars -base ".." ims_md_id] \
+                          "IMS Metadata Editor"] \
+                     [list   [export_vars -base "../metamd" ims_md_id] \
+                          "Meta Metadata"] \
+                     "Add Catalog-Entry"]
     set title "Add Meta MD Catalog-Entry"
 }
 
@@ -46,6 +42,7 @@
     -name metamd_cata \
     -cancel_url ../metamd?ims_md_id=$ims_md_id \
     -mode edit \
+    -select_query_name metamd_cata_ad_form \
     -form {
         ims_md_md_cata_id:key(ims_md_metadata_cata_seq)
 
@@ -69,8 +66,6 @@
 
         {ims_md_id:text(hidden) {value $ims_md_id}}
 
-    } -select_query_name metamd_cata_ad_form {
-
     } -edit_data {
         db_dml do_update {}