--- loncom/interface/loncommon.pm 2004/07/03 19:12:41 1.195 +++ loncom/interface/loncommon.pm 2004/07/15 18:50:37 1.199 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.195 2004/07/03 19:12:41 albertel Exp $ +# $Id: loncommon.pm,v 1.199 2004/07/15 18:50:37 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -250,6 +250,8 @@ of the element the selection from the se =cut sub browser_and_searcher_javascript { + my ($mode)=@_; + if (!defined($mode)) { $mode='edit'; } my $resurl=&lastresurl(); return <". + "$text"; + } + $template .= <<"ENDTEMPLATE"; (Help Menu) ENDTEMPLATE + if ($text ne '') { $template.='' }; return $template; } @@ -1874,6 +1883,9 @@ returns description of a specified copyr sub copyrightdescription { return &mt($cprtag{shift(@_)}); } + +=pod + =item * source_copyrightids() returns list of all source copyrights