cpan/CPAN-Meta-YAML/t/13_write_string.t


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24

use strict;
use warnings;
use lib 't/lib/';
use Test::More 0.88;
use SubtestCompat;
use TestUtils;
use TestBridge;

use CPAN::Meta::YAML ();

#--------------------------------------------------------------------------#
# Generally, write_string can be tested with .tml files in t/tml-local/*
#
# This file is for error tests or conditions that can't be easily tested
# via .tml
#--------------------------------------------------------------------------#

subtest 'write_string as class method' => sub {
    my $got = eval { CPAN::Meta::YAML->write_string };
    is( $@, '', "write_string lives" );
    is( $got, '', "returns empty string" );
};

done_testing;