Index: openacs-4/packages/lorsm/www/admin/md/generalmd/general_title.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/admin/md/generalmd/general_title.tcl,v
diff -u -r1.5 -r1.5.2.1
--- openacs-4/packages/lorsm/www/admin/md/generalmd/general_title.tcl	12 Dec 2008 14:25:38 -0000	1.5
+++ openacs-4/packages/lorsm/www/admin/md/generalmd/general_title.tcl	16 Apr 2010 21:41:40 -0000	1.5.2.1
@@ -19,23 +19,20 @@
 # set context & title
 if { ![ad_form_new_p -key ims_md_ge_ti_id]} {
     set context [list \
-                    [list   [export_vars -base ".." ims_md_id] \
-                            "[_ lorsm.IMS_Metadata_Editor]"] \
-
-                    [list   [export_vars -base "../generalmd" ims_md_id] \
-                            "[_ lorsm.General_MD]"] \
-
-                    "[_ lorsm.Edit_Titles]"]
+                     [list   [export_vars -base ".." ims_md_id] \
+                          "[_ lorsm.IMS_Metadata_Editor]"] \
+                     [list   [export_vars -base "../generalmd" ims_md_id] \
+                          "[_ lorsm.General_MD]"] \
+                     "[_ lorsm.Edit_Titles]"]
     set title "[_ lorsm.lt_Edit_General_MD_Title]"
 } else {
     set context [list \
-                    [list   [export_vars -base ".." ims_md_id] \
-                            "[_ lorsm.IMS_Metadata_Editor]"] \
-
-                    [list   [export_vars -base "../generalmd" ims_md_id] \
-                            "[_ lorsm.General_MD]"] \
-                    "[_ lorsm.Add_Titles]"]
-#    set context [list [list [export_vars -base ".." ims_md_id] "[_ lorsm.IMS_Metadata_Editor]"]  "[_ lorsm.General_MD]"]
+                     [list   [export_vars -base ".." ims_md_id] \
+                          "[_ lorsm.IMS_Metadata_Editor]"] \
+                     [list   [export_vars -base "../generalmd" ims_md_id] \
+                          "[_ lorsm.General_MD]"] \
+                     "[_ lorsm.Add_Titles]"]
+    
     set title "[_ lorsm.Add_General_MD_Title]"
 }
 
@@ -45,6 +42,7 @@
     -name generalmd_title \
     -cancel_url [export_vars -base "../generalmd" ims_md_id] \
     -mode edit \
+    -select_query_name generalmd_title_ad_form \
     -form {
         ims_md_ge_ti_id:key(ims_md_general_title_seq)
 
@@ -61,9 +59,6 @@
         }
 
         {ims_md_id:text(hidden) {value $ims_md_id}}
-
-    } -select_query_name generalmd_title_ad_form {
-
     } -edit_data {
         db_dml do_update {}