Index: openacs-4/contrib/packages/events/www/event-info.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/events/www/event-info.adp,v
diff -u -r1.6 -r1.7
--- openacs-4/contrib/packages/events/www/event-info.adp	4 Jun 2003 01:44:15 -0000	1.6
+++ openacs-4/contrib/packages/events/www/event-info.adp	5 Nov 2003 23:58:56 -0000	1.7
@@ -63,7 +63,7 @@
         </else>
       </if>
       <else>
-        <br><b>&raquo;</b> <a href="/register?return_url=/events/event-info?event_id=@event_id@"><b>Login or sign up</b></a>
+        <br><b>&raquo;</b> <a href="/register?return_url=@return_url@"><b>Login or sign up</b></a>
         <b>to register for this event.</b>
       </else>
     </else>
@@ -123,7 +123,7 @@
         </else>
       </if>
       <else>
-        <b>&raquo;</b> <a href="/register?return_url=/events/event-info?event_id=@event_id@">Login or sign up</a>
+        <b>&raquo;</b> <a href="/register?return_url=@return_url@">Login or sign up</a>
         to register for this event.
       </else>
     </if>
Index: openacs-4/contrib/packages/events/www/event-info.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/events/www/event-info.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/contrib/packages/events/www/event-info.tcl	4 Jun 2003 01:44:15 -0000	1.3
+++ openacs-4/contrib/packages/events/www/event-info.tcl	5 Nov 2003 23:58:56 -0000	1.4
@@ -63,6 +63,7 @@
     }
 }
 
+set return_url "[apm_package_url_from_key events]event-info?event_id=$event_id"
 set title "$event_info(name) in $event_info(city) on $event_info(timespan)"
 set context [list "$event_info(name) in $event_info(city)"]