Index: openacs-4/packages/webmail/www/create-view.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/webmail/www/create-view.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/webmail/www/create-view.tcl	18 Sep 2002 12:17:44 -0000	1.3
+++ openacs-4/packages/webmail/www/create-view.tcl	1 Mar 2005 00:01:45 -0000	1.4
@@ -46,7 +46,7 @@
 }
 lappend filter_list [list read matches $status]
 
-set user_id [ad_verify_and_get_user_id]
+set user_id [ad_conn user_id]
 set edit_filter_p [db_string filter_view_exists {
     SELECT 1 FROM wm_filter_views
     WHERE filter_id = :edit_filter_id