no_locale

VALUE

0 | 1

DEFAULT

0

DESCRIPTION

This pragma disables parsing of [L] and [LC] pseudo tags.

EXAMPLES

Example: enable pragma catalog wide

Pragma no_locale_parse

NOTES

Applying this pragma on the page level isn't really helpful, as pseudo tags contained in the page are parsed before the pragma directive.

AVAILABILITY

no_locale_parse is available in Interchange versions:

4.6.0-5.9.0 (git-head)

SOURCE

Interchange 5.9.0 (2/2 contexts shown):

Source: code/UserTag/loc.tag
Line 23 (context shows lines 13-27)

# it works with contained tags
#
UserTag loc Order       locale
UserTag l   Alias       loc
UserTag loc hasEndTag   1
UserTag loc Interpolate 1
UserTag loc Version     $Revision: 1.7 $
UserTag loc Routine     <<EOF
sub {
my ($locale, $message) = @_;
if($::Pragma->{no_locale_parse}) {
## Need to do this but might have side-effects in PreFork mode
undef $Vend::Parse::myRefs{Alias}{l};
my $begin = '[L';
$begin .= " $locale" if $locale;

Source: lib/Vend/Util.pm
Line 1113 (context shows lines 1103-1117 in parse_locale():1110)

}
$text =~ m{\[$Lang\](.*)\[/$Lang\]}s
  and return $1;
$text =~ s{\[(\w+)\].*\[/\1\].*}{}s;
return $text;
}

sub parse_locale {
my ($input) = @_;

return if $::Pragma->{no_locale_parse};

# avoid copying big strings
my $r = ref($input) ? $input : \$input;

AUTHORS

Interchange Development Group

Name