--- loncom/interface/loncommon.pm 2007/02/05 18:40:41 1.506 +++ loncom/interface/loncommon.pm 2007/03/01 02:33:04 1.510 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.506 2007/02/05 18:40:41 raeburn Exp $ +# $Id: loncommon.pm,v 1.510 2007/03/01 02:33:04 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2267,6 +2267,19 @@ sub track_student_link { &help_open_topic('View_recent_activity'); } +# ===================================================== Display a student photo + + +sub student_image_tag { + my ($domain,$user)=@_; + my $imgsrc=&Apache::lonnet::studentphoto($domain,$user,'jpg'); + if (($imgsrc) && ($imgsrc ne '/adm/lonKaputt/lonlogo_broken.gif')) { + return ''; + } else { + return ''; + } +} + =pod =back @@ -3662,9 +3675,20 @@ sub standard_css { return <