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