#!/usr/bin/perl
use warnings;
use strict;
use Test::More tests => 2;
use DateTime;
use Jifty::Everything;
my $dt = DateTime->new( year => 1950, month => 1, day => 1 );
Jifty->new( no_handle => 1 );
my $lh = Jifty::I18N->new();
# the localization method used to break DateTime object stringification
is($dt,_($dt));
# Substitution needs to work, even in the default locale
my $base = "I have %1 concrete mixers";
is(_($base,2), "I have 2 concrete mixers");