#!perl use 5.008001; use utf8; use strict; use warnings; ########################################################################### ########################################################################### # Constant values used by packages in this file: use only 'Readonly' => '1.03-'; Readonly my %TEXT_STRINGS => ( 'ROS_M_D_ARG_AOH_TO_CONSTR_RT_ND_HAS_KEY_CONFL' => q[.(): as expected, argument is an Array ref] . q[ of Hash refs, where each Hash ref specifies the values for] . q[ attributes of a new Node object to be created as a Root] . q[ Node of the invocant Document; however, at least one of] . q[ the given Hash refs defines an explicit '' key,] . q[ which isn't allowed when creating Nodes from .], 'ROS_M_N_ARG_AOH_TO_CONSTR_CH_ND_HAS_KEY_CONFL' => q[.(): as expected, argument is an Array ref] . q[ of Hash refs, where each Hash ref specifies the values for] . q[ attributes of a new Node object to be created as a Child] . q[ Node of the invocant Node; however, at least one of] . q[ the given Hash refs defines an explicit '' key,] . q[ which isn't allowed when creating Nodes from .], ); ########################################################################### ########################################################################### { package Rosetta::Model::L::en; # module use version; our $VERSION = qv('0.400.1'); sub get_text_by_key { my (undef, $msg_key) = @_; return $TEXT_STRINGS{$msg_key}; } } # module Rosetta::Model::L::en ########################################################################### ########################################################################### 1; # Magic true value required at end of a reuseable file's code. __END__ =pod =encoding utf8 =head1 NAME Rosetta::Model::L::en - Localization of Rosetta::Model for English =head1 VERSION This document describes Rosetta::Model::L::en version 0.400.1. =head1 SYNOPSIS I =head1 DESCRIPTION I =head1 INTERFACE I =head1 DIAGNOSTICS I =head1 CONFIGURATION AND ENVIRONMENT I =head1 DEPENDENCIES This file requires any version of Perl 5.x.y that is at least 5.8.1. It also requires the Perl 5 packages L and L, which would conceptually be built-in to Perl, but aren't, so they are on CPAN instead. It also requires these Perl 5 packages that are on CPAN: L. =head1 INCOMPATIBILITIES None reported. =head1 SEE ALSO Go to L for the majority of distribution-internal references, and L for the majority of distribution-external references. =head1 BUGS AND LIMITATIONS I =head1 AUTHOR Darren R. Duncan (C) =head1 LICENCE AND COPYRIGHT This file is part of the Rosetta DBMS framework. Rosetta is Copyright (c) 2002-2006, Darren R. Duncan. See the LICENCE AND COPYRIGHT of L for details. =head1 ACKNOWLEDGEMENTS The ACKNOWLEDGEMENTS in L apply to this file too. =cut