Index: openacs-4/packages/xowiki/tcl/form-field-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/form-field-procs.tcl,v
diff -u -r1.184 -r1.185
--- openacs-4/packages/xowiki/tcl/form-field-procs.tcl	13 Jul 2010 18:11:04 -0000	1.184
+++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl	15 Jul 2010 23:55:31 -0000	1.185
@@ -988,7 +988,7 @@
 	} else {
 	  set src "/shared/portrait-bits.tcl?user_id=$v"
 	}
-	set photo "<img class='photo' src='$src'>"
+	set photo "<img width='[my photo_size]' class='photo' src='$src'>"
 	set photo_class "photo"
       } else {
 	set photo ""
@@ -2788,3 +2788,5 @@
         {date with format}
   }
 }
+
+::xo::library source_dependent