Index: openacs-4/packages/acs-subsite/www/user/portrait/upload-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/user/portrait/Attic/upload-2.tcl,v
diff -u -r1.11.2.3 -r1.11.2.4
--- openacs-4/packages/acs-subsite/www/user/portrait/upload-2.tcl	26 Oct 2005 16:04:33 -0000	1.11.2.3
+++ openacs-4/packages/acs-subsite/www/user/portrait/upload-2.tcl	30 Nov 2005 18:45:04 -0000	1.11.2.4
@@ -98,7 +98,8 @@
 
     content::item::set_live_revision -revision_id $revision_id
     # Only create the new relationship if there does not exist one already
-    if {![relation::get_id -object_id_one $user_id -object_id_two $item_id -rel_type "user_portrait_rel"]} {
+   set user_portrait_rel_id [relation::get_id -object_id_one $user_id -object_id_two $item_id -rel_type "user_portrait_rel"]
+   if {[empty_string_p $user_portrait_rel_id]} {
 	db_exec_plsql create_rel {}
     }
 }