Index: openacs-4/packages/contacts/tcl/contact-search-condition-type-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/tcl/contact-search-condition-type-procs.tcl,v
diff -u -r1.39 -r1.40
--- openacs-4/packages/contacts/tcl/contact-search-condition-type-procs.tcl	29 Jun 2006 08:18:45 -0000	1.39
+++ openacs-4/packages/contacts/tcl/contact-search-condition-type-procs.tcl	21 Jun 2007 20:06:42 -0000	1.40
@@ -873,7 +873,7 @@
                                      [list "[_ contacts.contact_is_not_in_-]" "not_in"] \
                                     ]
 
-            set group_options_old [contact::groups -expand "all" -privilege_required "read" -package_id $package_id]
+            set group_options_old [contact::groups -expand "all" -privilege_required "read" -package_id $package_id -include_dotlrn_p "1"]
 	    set group_options [list]
 	    foreach group $group_options_old {
 		set group_name [lang::util::localize [lindex $group 0]]