|
version 1.220, 2002/12/09 22:40:18
|
version 1.221, 2002/12/13 21:39:19
|
|
Line 352 sub printtokenheader {
|
Line 352 sub printtokenheader {
|
| if ($target eq 'web') { |
if ($target eq 'web') { |
| my %idhash=&Apache::lonnet::idrget($tudom,($tuname)); |
my %idhash=&Apache::lonnet::idrget($tudom,($tuname)); |
| return |
return |
| '<img align="right" src="/cgi-bin/barcode.gif?encode='.$token.'" />'. |
'<img align="right" src="/cgi-bin/barcode.png?encode='.$token.'" />'. |
| 'Checked out for '.$plainname. |
'Checked out for '.$plainname. |
| '<br />User: '.$tuname.' at '.$tudom. |
'<br />User: '.$tuname.' at '.$tudom. |
| '<br />ID: '.$idhash{$tuname}. |
'<br />ID: '.$idhash{$tuname}. |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonxml.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / xml