Index: openacs-4/packages/acs-subsite/www/shared/portrait-thumbnail-bits.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/shared/Attic/portrait-thumbnail-bits.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/acs-subsite/www/shared/portrait-thumbnail-bits.tcl	2 Nov 2006 06:37:43 -0000	1.2
+++ openacs-4/packages/acs-subsite/www/shared/portrait-thumbnail-bits.tcl	10 Jan 2007 21:22:10 -0000	1.3
@@ -19,12 +19,12 @@
 where user_id = $user_id
 and portrait_thumbnail is not null"]
 
-if { [empty_string_p $file_type] } {
+if { $file_type eq "" } {
     # Try to get a regular portrait
     set file_type [db_string -default "" unused "select portrait_file_type
 from users
 where user_id = $user_id"]
-    if [empty_string_p $file_type] {
+    if {$file_type eq ""} {
 	ad_return_error "Couldn't find thumbnail or portrait" "Couldn't find a thumbnail or a portrait for User $user_id"
 	return
     }