![[BACK]](/icons/back.gif){kind=icon}
Return to lonsource.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface|
Return to lonsource.pm CVS log | Up to [LON-CAPA] / loncom / interface |
| version 1.17, 2006/06/22 18:17:23 | version 1.18, 2007/07/11 20:32:15 |
|---|---|
| Line 44 use LONCAPA; | Line 44 use LONCAPA; |
| sub make_link { | sub make_link { |
| my ($filename, $listname) = @_; | my ($filename, $listname) = @_; |
| my $sourcelink = "/adm/source?filename=".$filename."&listname=".$listname; | my $sourcelink = "/adm/source?inhibitmenu=yes&filename=".$filename."&listname=".$listname; |
| return $sourcelink; | return $sourcelink; |
| } | } |