Index: openacs-4/packages/dotlrn/tcl/community-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs.tcl,v
diff -u -r1.89 -r1.90
--- openacs-4/packages/dotlrn/tcl/community-procs.tcl	26 Mar 2002 20:21:29 -0000	1.89
+++ openacs-4/packages/dotlrn/tcl/community-procs.tcl	26 Mar 2002 20:54:41 -0000	1.90
@@ -938,7 +938,7 @@
                     # don't show the join link if the comm is closed, 
                     # and the first space is good below
                     append chunk \
-                            "<small>\[<a href=${url}${join_target}>"
+                            "<small>\[<a href=${url}${join_target}?referer=[ad_conn url]>"
                     if {[needs_approval_p -community_id $sc_id]} {
                         if {[member_pending_p -community_id $sc_id -user_id $user_id]} {
                             append chunk "waiting&nbsp;for&nbsp;approval"