Index: openacs-4/packages/ratings/www/rate.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ratings/www/rate.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/ratings/www/rate.tcl	19 May 2004 19:00:03 -0000	1.1
+++ openacs-4/packages/ratings/www/rate.tcl	20 May 2004 10:13:40 -0000	1.2
@@ -20,8 +20,8 @@
     -user_id $user_id \
     -rating $rating
 
-if {![empty_string_p $return_url]} { 
-    ad_returnredirect -message "Your rating is now $rating for this item." $return_url
-} else { 
-    ad_returnredirect -message "Your rating is now $rating for this item" [get_referrer]
+if {[empty_string_p $return_url]} { 
+    set return_url [get_referrer]
 }
+
+ad_returnredirect -message "Your rating is now $rating for this item." $return_url