Index: openacs-4/packages/search/tcl/search-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/search/tcl/search-procs.tcl,v
diff -u -N -r1.37 -r1.37.2.1
--- openacs-4/packages/search/tcl/search-procs.tcl	20 Oct 2006 21:04:49 -0000	1.37
+++ openacs-4/packages/search/tcl/search-procs.tcl	30 Jan 2007 14:03:56 -0000	1.37.2.1
@@ -67,7 +67,8 @@
     Checks whether the logged-in user is a guest
 } {
     set user_id [ad_conn user_id]
-    return [db_string get_is_guest_p {select dotlrn_privacy.guest_p(:user_id) from dual}]
+#    return [db_string get_is_guest_p {select dotlrn_privacy.guest_p(:user_id) from dual}]
+    return 0
 }
 
 ad_proc -public -callback search::action {