version 1.111.2.10.2.3, 2020/11/13 02:46:48
|
version 1.111.2.13.2.1, 2022/01/04 19:37:55
|
Line 202 sub handler {
|
Line 202 sub handler {
|
my ($pagesymb,$courseid,$domain,$name)=&Apache::lonnet::whichuser(); |
my ($pagesymb,$courseid,$domain,$name)=&Apache::lonnet::whichuser(); |
unless ($pagesymb) { |
unless ($pagesymb) { |
$pagesymb=&Apache::lonnet::symbread($requrl); |
$pagesymb=&Apache::lonnet::symbread($requrl); |
} |
} |
if ($pagesymb && ($courseid ne '') && ($domain ne '') && ($name ne '')) { |
if ($pagesymb && ($courseid ne '') && ($domain ne '') && ($name ne '')) { |
my %times=&Apache::lonnet::get('firstaccesstimes', |
my %times=&Apache::lonnet::get('firstaccesstimes', |
[$courseid."\0".$pagesymb], |
[$courseid."\0".$pagesymb], |
Line 743 ENDEXT
|
Line 743 ENDEXT
|
$uniquetimes{$item} = 1; |
$uniquetimes{$item} = 1; |
} |
} |
} |
} |
if (scalar(keys(%uniquetimes)) == 1) { |
if (scalar(keys(%uniquetimes)) == 1) { |
my (%uniquedisplays,%uniquedones,$currdisp,$donebuttontime, |
my (%uniquedisplays,%uniquedones,$currdisp,$donebuttontime, |
$donebuttonextras); |
$donebuttonextras); |
if (keys(%countdowndisp)) { |
if (keys(%countdowndisp)) { |
Line 1043 sub get_buttons {
|
Line 1043 sub get_buttons {
|
if (($hash->{'src_'.$rid}=~/$LONCAPA::assess_re/) && |
if (($hash->{'src_'.$rid}=~/$LONCAPA::assess_re/) && |
($hash->{'src_'.$rid} !~ m-^/uploaded/-)) { |
($hash->{'src_'.$rid} !~ m-^/uploaded/-)) { |
|
|
if ((&Apache::lonnet::allowed('mgr',$crs_sec)) || |
if ((&Apache::lonnet::allowed('mgr',$crs_sec)) || |
(&Apache::lonnet::allowed('vgr',$crs_sec))) { |
(&Apache::lonnet::allowed('vgr',$crs_sec))) { |
$metainfo.= |
$metainfo.= |
'<a href="/adm/grades?symb='.&escape($symb). |
'<a href="/adm/grades?symb='.&escape($symb). |
Line 1056 sub get_buttons {
|
Line 1056 sub get_buttons {
|
} |
} |
if (&Apache::lonnet::allowed('mgr',$crs_sec)) { |
if (&Apache::lonnet::allowed('mgr',$crs_sec)) { |
$metainfo.= |
$metainfo.= |
'<a href="/adm/grades?symb='.&escape($symb). |
'<a href="/adm/grades?symb='.&escape($symb). |
# '&command=gradingmenu" target="LONcatInfo">'. |
# '&command=gradingmenu" target="LONcatInfo">'. |
'&command=gradingmenu">'. |
'&command=gradingmenu">'. |
'<img src="/res/adm/pages/pgrd.png" class="LC_icon"'. |
'<img src="/res/adm/pages/pgrd.png" class="LC_icon"'. |
' alt="'.&mt('Content Grades').'"'. |
' alt="'.&mt('Content Grades').'"'. |
' title="'.&mt('Content Grades').'" />'. |
' title="'.&mt('Content Grades').'" />'. |
'</a>'; |
'</a>'; |
} |
} |
if ((&Apache::lonnet::allowed('opa',$crs_sec)) || |
if ((&Apache::lonnet::allowed('opa',$crs_sec)) || |
(&Apache::lonnet::allowed('vpa',$crs_sec))) { |
(&Apache::lonnet::allowed('vpa',$crs_sec))) { |
$metainfo.= |
$metainfo.= |
'<a href="/adm/parmset?symb='.&escape($symb). |
'<a href="/adm/parmset?symb='.&escape($symb). |