File: lists.t

package info (click to toggle)
libpandoc-wrapper-perl 0.9.2-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 304 kB
  • sloc: perl: 589; makefile: 5; sh: 1
file content (20 lines) | stat: -rw-r--r-- 464 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
use strict;
use Test::More;
use Test::Exception;
use Pandoc;

plan skip_all => 'pandoc executable required' unless pandoc;

my @in = pandoc->input_formats;
ok scalar @in > 5, 'input_formats';

my @out = pandoc->output_formats;
ok scalar @out > 5, 'output_formats';

if (pandoc->version >= 1.18) {
    my %ext = pandoc->extensions;
    is $ext{raw_html}, 1, 'extensions: raw_html';
    is $ext{hard_line_breaks}, 0, 'extensions: hard_line_breaks';
}

done_testing;