version 1.99.2.6, 2004/09/13 18:20:38
|
version 1.99.2.7, 2004/09/15 20:29:37
|
Line 115 sub list_discussion {
|
Line 115 sub list_discussion {
|
} |
} |
|
|
# Get discussion display default settings for user |
# Get discussion display default settings for user |
my %userenv = &Apache::lonnet::get('environment',['discdisplay','discmarkread'],$ENV{'user.domain'},$ENV{'user.name'}); |
if ($ENV{'environment.discdisplay'} eq 'unread') { |
my $discdisplay=$userenv{'discdisplay'}; |
|
if ($discdisplay eq 'unread') { |
|
$showonlyunread = 1; |
$showonlyunread = 1; |
} |
} |
my $discmarkread=$userenv{'discmarkread'}; |
if ($ENV{'environment.discmarkread'} eq 'ondisp') { |
if ($discmarkread eq 'ondisp') { |
|
$markondisp = 1; |
$markondisp = 1; |
} |
} |
|
|
Line 229 sub list_discussion {
|
Line 226 sub list_discussion {
|
if ($hidden) { |
if ($hidden) { |
$message='<font color="#888888">'.$message.'</font>'; |
$message='<font color="#888888">'.$message.'</font>'; |
} |
} |
my $screenname=&Apache::loncommon::screenname( |
# my $screenname=&Apache::loncommon::screenname( |
$contrib{$idx.':sendername'}, |
# $contrib{$idx.':sendername'}, |
$contrib{$idx.':senderdomain'}); |
# $contrib{$idx.':senderdomain'}); |
my $plainname=&Apache::loncommon::nickname( |
# my $plainname=&Apache::loncommon::nickname( |
$contrib{$idx.':sendername'}, |
# $contrib{$idx.':sendername'}, |
$contrib{$idx.':senderdomain'}); |
# $contrib{$idx.':senderdomain'}); |
|
($$screenname,$$plainname)=($$contrib{$idx.':screenname'}, |
|
$$contrib{$idx.':plainname'}); |
my $sender=&mt('Anonymous'); |
my $sender=&mt('Anonymous'); |
if ((!$contrib{$idx.':anonymous'}) || ($seeid)) { |
if ((!$contrib{$idx.':anonymous'}) || ($seeid)) { |
$sender=&Apache::loncommon::aboutmewrapper( |
$sender=&Apache::loncommon::aboutmewrapper( |