--- loncom/interface/loncommon.pm 2003/12/27 23:55:10 1.165 +++ loncom/interface/loncommon.pm 2003/12/29 17:11:53 1.166 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.165 2003/12/27 23:55:10 raeburn Exp $ +# $Id: loncommon.pm,v 1.166 2003/12/29 17:11:53 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1508,8 +1508,9 @@ sub noteswrapper { # ------------------------------------------------------------- Aboutme Wrapper sub aboutmewrapper { - my ($link,$username,$domain)=@_; - return "$link"; + my ($link,$username,$domain,$target)=@_; + return "$link"; } # ------------------------------------------------------------ Syllabus Wrapper @@ -1587,7 +1588,7 @@ returns description of a specified copyr =cut sub copyrightdescription { - return $cprtag{shift(@_)}; + return &mt($cprtag{shift(@_)}); } =pod @@ -1636,7 +1637,7 @@ returns description for a specified file =cut sub filedescription { - return $fd{lc(shift(@_))}; + return &mt($fd{lc(shift(@_))}); } =pod @@ -1650,7 +1651,7 @@ extra formatting sub filedescriptionex { my $ex=shift; - return '.'.$ex.' '.$fd{lc($ex)}; + return '.'.$ex.' '.&mt($fd{lc($ex)}); } # End of .tab access