--- loncom/interface/lonnavmaps.pm 2002/06/24 14:28:10 1.36
+++ loncom/interface/lonnavmaps.pm 2002/07/25 16:55:53 1.39
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Navigate Maps Handler
#
-# $Id: lonnavmaps.pm,v 1.36 2002/06/24 14:28:10 www Exp $
+# $Id: lonnavmaps.pm,v 1.39 2002/07/25 16:55:53 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -278,8 +278,7 @@ sub addresource {
}
my $brepriv=&Apache::lonnet::allowed('bre',$resource);
if ($hash{'src_'.$rid}) {
- if ((($brepriv eq '2') && (!$hash{'randomout_'.$rid}))
- || ($brepriv eq 'F')) {
+ if (($brepriv eq '2') || ($brepriv eq 'F')) {
my $pprefix='';
if ($resource=~/\.(problem|exam|quiz|assess|survey|form)$/) {
$pprefix=&astatus($rid);
@@ -711,10 +710,14 @@ sub handler {
for(my $i=-1;$i<$indent;$i++) { $indentstr.=$is; }
}
if (!$linkid) { $linkid=$rid; }
+ if ($hash{'randomout_'.$rid}) {
+ $adde=' (hidden)'.$adde;
+ }
$r->print($add.$indentstr);
if ($rid) {
$r->print(''.
$hwk.$hash{'title_'.$rid}.$hwke.'');
}