Index: openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl,v
diff -u -r1.133.2.36 -r1.133.2.37
--- openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	6 Apr 2014 11:34:04 -0000	1.133.2.36
+++ openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	16 Apr 2014 18:22:58 -0000	1.133.2.37
@@ -2320,7 +2320,13 @@
     @see util_user_message
     @see ad_script_abort
 } {
+    ns_log notice "ad_returnredirect message <$message> url <$target_url>"
     if {$message ne ""} {
+	#
+	# Leave a hint, that we do not want to be consumed on the
+	# current page.
+	#
+        set ::__skip_util_get_user_messages 1
 	if { [string is false $html_p] } {
 	    util_user_message -message $message
 	} else {
@@ -2416,6 +2422,14 @@
     @see util_user_message
 } {
     set messages [ad_get_client_property -default {} -cache_only t "acs-kernel" "general_messages"]
+
+    #
+    # If there is a hint on the current page, that we do not want the
+    # content to be consumed (e.g. a redirect) the force keep_p.
+    #
+    if {[info exists ::__skip_util_get_user_messages]} {
+       set keep_p 1
+    }
     if { !$keep_p && $messages ne "" } {
         ad_set_client_property "acs-kernel" "general_messages" {}
     }