t/regression-rt68443.t

   1 #!perl
   2
   3 use 5.010;
   4 use strict;
   5 use warnings;
   6
   7 use FindBin '$Bin';
   8 use lib $Bin, "$Bin/t";
   9
  10 use Org::Parser;
  11 use Test::More 0.96;
  12 require "testlib.pl";
  13
  14 test_parse(
  15     name => 'regression test RT#68443',
  16     filter_elements => 'Org::Element::Table',
  17     doc  => <<'_',
  18 * test
  19   | some text in a table | column |
  20   |----------------------+--------|
  21   |                      |        |
  22   something outside a table
  23 _
  24     num => 1,
  25 );
  26
  27 done_testing();