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.138 -r1.139
--- openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl 15 Jun 2015 13:03:32 -0000 1.138
+++ openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl 22 Jun 2015 21:03:13 -0000 1.139
@@ -1181,7 +1181,7 @@
if {$format eq "url"} {
lappend return_list "[ns_urlencode $name]=[ns_urlencode $value]"
} else {
- lappend return_list " name=\"[ad_quotehtml $name]\" value=\"[ad_quotehtml $value]\""
+ lappend return_list " name=\"[ns_quotehtml $name]\" value=\"[ns_quotehtml $value]\""
}
}
incr set_counter_i
@@ -1190,7 +1190,7 @@
if {$format eq "url"} {
return [join $return_list "&"]
} else {
- return "
\n
"
+ return "
\n
"
}
}
@@ -2228,17 +2228,17 @@
Meta Refresh page instead of a redirect.
} {
- ad_return_top_of_page "
+ ad_return_top_of_page [subst {
- Loading...
- If your browser does not automatically redirect you, please click here .
- "
+ If your browser does not automatically redirect you, please click here .
+ }]
}
# Brad Duell (bduell@ncacasi.org) 07/10/2003