--- loncom/localize/localize/en.pm 2006/12/23 05:49:04 1.3 +++ loncom/localize/localize/en.pm 2006/12/23 06:16:30 1.4 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Hebrew Localization Lexicon # -# $Id: en.pm,v 1.3 2006/12/23 05:49:04 albertel Exp $ +# $Id: en.pm,v 1.4 2006/12/23 06:16:30 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -32,23 +32,33 @@ use strict; package Apache::localize::en; use base qw(Apache::localize); -%Apache::localize::en::Lexicon=('_AUTO' => 1, +%Apache::localize::en::Lexicon= +( + '_AUTO' => 1, -'char_encoding'=> 'UTF-8', -'language_code'=> 'en', + 'char_encoding'=> 'UTF-8', + 'language_code'=> 'en', -'_empty_mail_folder' - => - sub { - my (undef,$status,$description) = @_; - if ($status eq '') { - return 'Empty Folder'; - } elsif ($status eq 'replied') { - return 'You have not replied to any messages in this folder.'; - } else { - return 'There are no '.lc($description).' messages in this folder.'; - } - }, + '_empty_mail_folder' + => sub { + my (undef,$status,$description) = @_; + if ($status eq '') { + return 'Empty Folder'; + } elsif ($status eq 'replied') { + return 'You have not replied to any messages in this folder.'; + } else { + return 'There are no '.lc($description).' messages in this folder.'; + } + }, + + '_location_in_mail_folder' + => sub { + my (undef,$status,$description,$first,$finish,$total) = @_; + if ($msgstatus eq '') { $description = 'All'; } + + return ''.$description.' messages: showing messages '.$first. + ' through '.$finish.' of '.$total.'.'; + }, #SYNCMARKER );