--- loncom/interface/londocs.pm 2002/08/27 13:01:26 1.12 +++ loncom/interface/londocs.pm 2002/08/31 00:43:12 1.14 @@ -1,7 +1,7 @@ # The LearningOnline Network # Documents # -# $Id: londocs.pm,v 1.12 2002/08/27 13:01:26 www Exp $ +# $Id: londocs.pm,v 1.14 2002/08/31 00:43:12 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -209,6 +209,13 @@ sub handler { my $coursenum=$ENV{'course.'.$ENV{'request.course.id'}.'.num'}; my $coursedom=$ENV{'course.'.$ENV{'request.course.id'}.'.domain'}; +# get personal data + + my $uname=$ENV{'user.name'}; + my $udom=$ENV{'user.domain'}; + my $plainname=&Apache::lonnet::escape( + &Apache::loncommon::plainname($uname,$udom)); + # graphics settings $iconpath = $r->dir_config('lonIconsURL') . "/"; @@ -256,19 +263,24 @@ Title:
+
+
- + +
- +