version 1.114, 2001/08/15 15:49:14
|
version 1.115, 2001/08/15 23:19:20
|
Line 200 sub checkout {
|
Line 200 sub checkout {
|
$reply{'generation'}; |
$reply{'generation'}; |
|
|
if ($target eq 'web') { |
if ($target eq 'web') { |
return 'Checked out for '.$plainname. |
return |
|
'<img align="right" src="/cgi-bin/barcode.gif?encode='.$token.'" />'. |
|
'Checked out for '.$plainname. |
'<br />User: '.$tuname.' at '.$tudom. |
'<br />User: '.$tuname.' at '.$tudom. |
'<br />CourseID: '.$tcrsid.')'. |
'<br />CourseID: '.$tcrsid.')'. |
'<br />DocID: '.$token. |
'<br />DocID: '.$token. |
'<br />Time: '.localtime($now). |
'<br />Time: '.localtime($now).'<hr />'; |
'<img align="right" src="/cgi-bin/barcode.gif?encode='.$token.'" /><hr />'; |
|
} else { |
} else { |
return $token; |
return $token; |
} |
} |