[LON-CAPA-cvs] cvs: loncom /interface loncommon.pm

[albertel]

albertel		Wed Jul 19 07:30:36 2006 EDT

  Modified files:              
    /loncom/interface	loncommon.pm 
  Log:
  - make the name a link to the about me page
  
  
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.433 loncom/interface/loncommon.pm:1.434
--- loncom/interface/loncommon.pm:1.433	Wed Jul 19 06:58:31 2006
+++ loncom/interface/loncommon.pm	Wed Jul 19 07:30:36 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.433 2006/07/19 10:58:31 albertel Exp $
+# $Id: loncommon.pm,v 1.434 2006/07/19 11:30:36 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2919,6 +2919,8 @@
     my $name = &plainname($env{'user.name'},$env{'user.domain'});
     if ($env{'user.name'} eq 'public' && $env{'user.domain'} eq 'public') {
 	undef($role);
+    } else {
+	$name = &aboutmewrapper($name,$env{'user.name'},$env{'user.domain'});
     }
     
     my $roleinfo=(<<ENDROLE);