Index: openacs-4/packages/ratings/www/rate.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ratings/www/rate.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/ratings/www/rate.tcl	20 May 2004 10:13:40 -0000	1.2
+++ openacs-4/packages/ratings/www/rate.tcl	21 May 2004 07:48:05 -0000	1.3
@@ -15,10 +15,10 @@
 
 set user_id [auth::require_login]
 
-ratings::rate -dimension_key $dimension_key \
-    -object_id $object_id \
-    -user_id $user_id \
-    -rating $rating
+set rating_id [ratings::rate -dimension_key $dimension_key \
+                   -object_id $object_id \
+                   -user_id $user_id \
+                   -rating $rating]
 
 if {[empty_string_p $return_url]} { 
     set return_url [get_referrer]