version 1.82, 2004/05/07 12:03:53
|
version 1.83, 2004/05/11 10:42:41
|
Line 84 sub list_discussion {
|
Line 84 sub list_discussion {
|
$prevread = $dischash{$lastkey}; |
$prevread = $dischash{$lastkey}; |
} |
} |
|
|
|
# Get discussion display default setting for user |
|
my %userenv = &Apache::lonnet::get('environment',['discdisplay'],$ENV{'user.domain'},$ENV{'user.name'}); |
|
my $discdisplay=$userenv{'discdisplay'}; |
|
if ($discdisplay eq 'unread') { |
|
$showonlyunread = 1; |
|
} |
|
|
|
# Override user's default if user specified display setting for this discussion |
if (defined($dischash{$showkey})) { |
if (defined($dischash{$showkey})) { |
$showonlyunread = $dischash{$showkey}; |
$showonlyunread = $dischash{$showkey}; |
} |
} |