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}. |