Return to en.pm CVS log

Up to [LON-CAPA] / loncom / localize / localize

- adding another example

# The LearningOnline Network with CAPA
# Hebrew Localization Lexicon
#
# $Id: en.pm,v 1.4 2006/12/23 06:16:30 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
# This file is part of the LearningOnline Network with CAPA (LON-CAPA).
#
# LON-CAPA is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# LON-CAPA is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with LON-CAPA; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
#
# /home/httpd/html/adm/gpl.txt
#
# http://www.lon-capa.org/
#
######################################################################
######################################################################

use strict;
package Apache::localize::en;
use base qw(Apache::localize);

%Apache::localize::en::Lexicon=
(
 '_AUTO' => 1,
          
 '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.';
     }
 },

 '_location_in_mail_folder'
 => sub {
     my (undef,$status,$description,$first,$finish,$total) = @_;
     if ($msgstatus eq '') { $description = 'All'; }

     return '<b>'.$description.' messages</b>: showing messages '.$first.
	 ' through '.$finish.' of '.$total.'.';
 },

#SYNCMARKER
);

1;