--- 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 <