- height=1> |
+ height="1"> |
|
@decoration_open;noquote@@bookmark.bookmark_title;noquote@@decoration_close;noquote@ @action_bar;noquote@ @private_text;noquote@ |
Index: openacs-4/packages/bookmarks/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bookmarks/www/index.tcl,v
diff -u -r1.13 -r1.14
--- openacs-4/packages/bookmarks/www/index.tcl 7 Aug 2014 07:36:55 -0000 1.13
+++ openacs-4/packages/bookmarks/www/index.tcl 27 Jun 2015 12:32:47 -0000 1.14
@@ -18,7 +18,9 @@
} -validate {
valid_user_id -requires {viewed_user_id:integerl} {
- if { [db_string user_exists "select 1 from parties where party_id = :viewed_user_id" -bind "viewed_user_id $viewed_user_id" -default ""] eq "" } {
+ if { [db_string user_exists {select 1 from parties where party_id = :viewed_user_id} \
+ -bind "viewed_user_id $viewed_user_id" \
+ -default ""] eq "" } {
ad_complain "The user_id in the url is invalid"
}
}
@@ -68,9 +70,10 @@
# will be the page that the user is browsing.
set return_url_urlenc [ad_urlencode [ad_conn url]?[export_vars -url {viewed_user_id}]]
-set user_name [db_string user_name "select first_names || ' ' || last_name from cc_users where object_id = :viewed_user_id" -bind "viewed_user_id $viewed_user_id" -default ""]
+set user_name [db_string user_name {select first_names || ' ' || last_name from cc_users where object_id = :viewed_user_id} \
+ -bind "viewed_user_id $viewed_user_id" -default ""]
-set page_title [db_string bookmark_system_name "select acs_object.name(:package_id) from dual"]
+set page_title [db_string bookmark_system_name {select acs_object.name(:package_id) from dual}]
set context [bm_context_bar_args "" $viewed_user_id]