Index: openacs-4/packages/bookmarks/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bookmarks/www/index.tcl,v
diff -u -r1.10 -r1.11
--- openacs-4/packages/bookmarks/www/index.tcl	9 Sep 2013 17:51:47 -0000	1.10
+++ openacs-4/packages/bookmarks/www/index.tcl	18 Apr 2014 06:38:29 -0000	1.11
@@ -43,7 +43,7 @@
 set browsing_user_id [ad_conn user_id]
 
 # Is the user viewing his own bookmarks?
-if { ![info exists viewed_user_id] || [string equal $viewed_user_id $browsing_user_id] } {
+if { ![info exists viewed_user_id] || $viewed_user_id eq $browsing_user_id } {
     # The user is viewing his own bookmarks
     set viewed_user_id $browsing_user_id
     set context {}
@@ -74,7 +74,7 @@
 
 set context [bm_context_bar_args "" $viewed_user_id]
 
-if { ![string equal $viewed_user_id "0"] } {
+if { $viewed_user_id ne "0" } {
     set root_folder_id [bm_get_root_folder_id [ad_conn package_id] $viewed_user_id]
 } else {
     set root_folder_id 0
@@ -107,7 +107,7 @@
 
 # We let the owner of the bookmarks see which bookmarks are private,
 # and use a MUCH less expensive query that doesn't hit permissions
-if { [string equal $browsing_user_id $viewed_user_id] } {
+if {$browsing_user_id eq $viewed_user_id} {
     set private_select [db_map private_select]
 db_multirow bookmark my_bookmarks_select ""