Index: openacs-4/packages/cms/www/modules/categories/edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/cms/www/modules/categories/edit.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/cms/www/modules/categories/edit.tcl	16 Aug 2002 00:25:33 -0000	1.3
+++ openacs-4/packages/cms/www/modules/categories/edit.tcl	12 Apr 2005 21:45:42 -0000	1.4
@@ -26,15 +26,11 @@
   form get_values edit_keyword keyword_id heading description
 
   db_transaction {
-      db_exec_plsql edit_keyword {
-    begin 
-      content_keyword.set_heading(:keyword_id, :heading);
-      content_keyword.set_description(:keyword_id, :description);
-    end;
-      }
+      db_exec_plsql edit_keyword {}
   }
 
-  template::forward "refresh-tree?id=$keyword_id&goto_id=$parent_id&mount_point=$mount_point"
+  set id $keyword_id
+  ad_returnredirect [export_vars -base index { id parent_id mount_point }]
 }