|
version 1.18, 2004/05/11 18:43:21
|
version 1.20, 2004/05/12 19:25:15
|
|
Line 149 ENDDOCUMENT
|
Line 149 ENDDOCUMENT
|
| # ---------------------------------------------------------------- Get syllabus |
# ---------------------------------------------------------------- Get syllabus |
| if (($syllabus{'uploaded.lastmodified'}) || ($allowed)) { |
if (($syllabus{'uploaded.lastmodified'}) || ($allowed)) { |
| if ($syllabus{'uploaded.photourl'}) { |
if ($syllabus{'uploaded.photourl'}) { |
| if ($target ne 'tex') { |
&Apache::lonnet::allowuploaded('/adm/smppg', |
| &Apache::lonnet::allowuploaded('/adm/smppg', |
$syllabus{'uploaded.photourl'}); |
| $syllabus{'uploaded.photourl'}); |
|
| $r->print('<img src="'.$syllabus{'uploaded.photourl'}. |
my $image='<img src="'.$syllabus{'uploaded.photourl'}.'" |
| '" align="right" />'); |
align="right" />'; |
| } else { |
if ($target eq 'tex') { |
| &Apache::lonnet::allowuploaded('/adm/smppg', |
$image=&Apache::lonxml::xmlparse($r,'tex',$image); |
| $syllabus{'uploaded.photourl'}); |
|
| $r->print(&Apache::lonxml::xmlparse($r,'tex','<img src="'.$syllabus{'uploaded.photourl'}. |
|
| '" align="right" />')); |
|
| } |
} |
| |
$r->print($image); |
| } |
} |
| if ($allowed) { |
if ($allowed) { |
| $r->print( |
$r->print( |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonsimplepage.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface