r23533 - in /branches/upstream/libtext-markdown-perl/current: ./ lib/Text/ script/ t/ t/MultiMarkdown.mdtest/ t/Text-Markdown.mdtest/ t/Text-MultiMarkdown.mdtest/
ansgar-guest at users.alioth.debian.org
ansgar-guest at users.alioth.debian.org
Thu Jul 24 18:14:38 UTC 2008
Author: ansgar-guest
Date: Thu Jul 24 18:14:33 2008
New Revision: 23533
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=23533
Log:
[svn-upgrade] Integrating new upstream version, libtext-markdown-perl (1.0.21)
Added:
branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Footnotes.text
branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Footnotes.xhtml
branches/upstream/libtext-markdown-perl/current/t/Text-Markdown.mdtest/CoreDumps5.8.text
branches/upstream/libtext-markdown-perl/current/t/Text-Markdown.mdtest/CoreDumps5.8.xhtml
branches/upstream/libtext-markdown-perl/current/t/Text-MultiMarkdown.mdtest/Warnings-rt34856.text
branches/upstream/libtext-markdown-perl/current/t/Text-MultiMarkdown.mdtest/Warnings-rt34856.xhtml
branches/upstream/libtext-markdown-perl/current/t/code-hr.t
Modified:
branches/upstream/libtext-markdown-perl/current/Changes
branches/upstream/libtext-markdown-perl/current/MANIFEST
branches/upstream/libtext-markdown-perl/current/Todo
branches/upstream/libtext-markdown-perl/current/lib/Text/Markdown.pm
branches/upstream/libtext-markdown-perl/current/lib/Text/MultiMarkdown.pm
branches/upstream/libtext-markdown-perl/current/script/MultiMarkdown.pl
branches/upstream/libtext-markdown-perl/current/t/03podspelling.t
branches/upstream/libtext-markdown-perl/current/t/23afulldocs-multimarkdown.t
branches/upstream/libtext-markdown-perl/current/t/32tabwidth.t
branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Backslash_escapes.xhtml
branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Inline_HTML_(Advanced).xhtml
branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Ordered_and_unordered_lists.xhtml
Modified: branches/upstream/libtext-markdown-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-markdown-perl/current/Changes?rev=23533&op=diff
==============================================================================
--- branches/upstream/libtext-markdown-perl/current/Changes (original)
+++ branches/upstream/libtext-markdown-perl/current/Changes Thu Jul 24 18:14:33 2008
@@ -163,20 +163,30 @@
- Update README.txt
- Allow scripts to be used on multiple input files at once (processing
in command line order)
- - Update footnote behavior of Text::MutliMarkdown to be consistent
- with the latest version of MultiMarkdown
- - Added tests for the new footnote functionality.
- - Added tests for all the MDTest corner cases brought up on the list.
- Noted why / how I differ from original Markdown.
- - Moved all the document tests to MDTest format. I have made MDTest
- test suites for Text::Markdown and Text::MultiMarkdown, containing
- **only** the bug fixes and behavior changes I've made, I've imported
- the Markdown test suite from MDTest1.1, and the MultiMarkdown test
+ - Update footnote behavior of Text::MutliMarkdown to be consistent
+ with the latest version of MultiMarkdown
+ - Added tests for the new footnote functionality.
+ - Added tests for all the MDTest corner cases brought up on the list.
+ Noted why / how I differ from original Markdown.
+ - Moved all the document tests to MDTest format. I have made MDTest
+ test suites for Text::Markdown and Text::MultiMarkdown, containing
+ **only** the bug fixes and behavior changes I've made, I've imported
+ the Markdown test suite from MDTest1.1, and the MultiMarkdown test
suite.
- - RT#36537 doc patch to add POD to the scripts from Debian's Gunnar
- Wolf.
- - Mutilate the list processing somewhat to reduce the compilation
- of recursive regexes, and so stop perl (<5.10) crapping itself
- on lots of input. This isn't the full fix - really shouldn't be
- usng recursive regexes at all. RT#37297
+ - RT#36537 doc patch to add POD to the scripts from Debian's Gunnar
+ Wolf.
+ - Mutilate the list processing somewhat to reduce the compilation
+ of recursive regexes, and so stop perl (<5.10) crapping itself
+ on lots of input. This isn't the full fix - really shouldn't be
+ usng recursive regexes at all. RT#37297
+1.0.21 2008-07-24T08:33:00
+ - Fix hard tabs in Changelog
+ - Add unit test for core dumps issue from RT#36203
+ - Fix POD spelling.
+ - Fix warning from RT#34856.
+ - Add test for another tab width issue (related to <hr> generation)
+ from RT#37769. Fix this issue.
+ - More test additions and more splitting the test suites into MDTest
+ modules.
+
Modified: branches/upstream/libtext-markdown-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-markdown-perl/current/MANIFEST?rev=23533&op=diff
==============================================================================
--- branches/upstream/libtext-markdown-perl/current/MANIFEST (original)
+++ branches/upstream/libtext-markdown-perl/current/MANIFEST Thu Jul 24 18:14:33 2008
@@ -1,3 +1,4 @@
+inc/Module/Install/Makefile.pm
Makefile.PL
Changes
inc/Module/Install.pm
@@ -8,7 +9,6 @@
inc/Module/Install/Scripts.pm
inc/Module/Install/Win32.pm
inc/Module/Install/WriteAll.pm
-inc/Module/Install/Makefile.pm
lib/Text/Markdown.pm
lib/Text/MultiMarkdown.pm
License.text
@@ -60,6 +60,7 @@
t/37anchormultilinebugs.t
t/38listshorizontalrule.t
t/39listsindentededgecase.t
+t/code-hr.t
t/docs-maruku-unittest/abbreviations.html
t/docs-maruku-unittest/abbreviations.text
t/docs-maruku-unittest/alt.html
@@ -373,6 +374,8 @@
t/Markdown-from-MDTest1.1.mdtest/Tidyness.xhtml
t/MultiMarkdown.mdtest/Backslash_escapes.text
t/MultiMarkdown.mdtest/Backslash_escapes.xhtml
+t/MultiMarkdown.mdtest/Footnotes.text
+t/MultiMarkdown.mdtest/Footnotes.xhtml
t/MultiMarkdown.mdtest/Inline_HTML_(Advanced).text
t/MultiMarkdown.mdtest/Inline_HTML_(Advanced).xhtml
t/MultiMarkdown.mdtest/Inline_HTML_(Simple).text
@@ -423,6 +426,8 @@
t/PHP_Markdown-from-MDTest1.1.mdtest/PHP-Specific_Bugs.xhtml
t/PHP_Markdown-from-MDTest1.1.mdtest/Tight_blocks.text
t/PHP_Markdown-from-MDTest1.1.mdtest/Tight_blocks.xhtml
+t/Text-Markdown.mdtest/CoreDumps5.8.text
+t/Text-Markdown.mdtest/CoreDumps5.8.xhtml
t/Text-Markdown.mdtest/Emphasis.text
t/Text-Markdown.mdtest/Emphasis.xhtml
t/Text-Markdown.mdtest/HTML-Comment-encoding.text
@@ -515,6 +520,8 @@
t/Text-MultiMarkdown.mdtest/Tables.xhtml
t/Text-MultiMarkdown.mdtest/Tabs.text
t/Text-MultiMarkdown.mdtest/Tabs.xhtml
+t/Text-MultiMarkdown.mdtest/Warnings-rt34856.text
+t/Text-MultiMarkdown.mdtest/Warnings-rt34856.xhtml
t/Text-MultiMarkdown.mdtest/Wiki_Features.text
t/Text-MultiMarkdown.mdtest/Wiki_Features.xhtml
Todo
Modified: branches/upstream/libtext-markdown-perl/current/Todo
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-markdown-perl/current/Todo?rev=23533&op=diff
==============================================================================
--- branches/upstream/libtext-markdown-perl/current/Todo (original)
+++ branches/upstream/libtext-markdown-perl/current/Todo Thu Jul 24 18:14:33 2008
@@ -1,4 +1,4 @@
-Todo pre 1.0.21:
+Todo pre 1.0.22:
. Tests for $footnote =~ s/^glossary:\s*//i
. Tests for $footnote_closing_tag
. Add an option to Text::Markdown to have original brand markdown style
@@ -9,7 +9,7 @@
host?
. Re-write this Todo list.
-Todo pre 1.0.22:
+Todo pre 1.0.23:
. Make Markdown.pl and MultiMarkdown.pl warn if unexpected options are
used, and also have docs on what options are available. Expose the other
module options in the scripts.
@@ -19,7 +19,7 @@
. Document the markdown (and multimarkdown) syntaxes in the module
properly.
-Todo pre 1.0.23:
+Todo pre 1.0.24:
. Fix the list bug (see t/17ulolreportedonlist.t and Markdown mailing
list) This probably involves the first draught of the new parser...
. Text::Balanced is the slowest thing ever.
@@ -27,7 +27,7 @@
49.4 0.569 0.568 113 0.0050 0.0050 Text::Balanced::_match_tagged
18.1 0.209 0.791 3 0.0696 0.2637 Text::MultiMarkdown::_HashHTMLBlocks
-Todo pre 1.0.24:
+Todo pre 1.0.25:
. Have a look at extra features in
http://code.google.com/p/python-markdown2/wiki/Extras and put anything
we consider useful on the roadmap.
Modified: branches/upstream/libtext-markdown-perl/current/lib/Text/Markdown.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-markdown-perl/current/lib/Text/Markdown.pm?rev=23533&op=diff
==============================================================================
--- branches/upstream/libtext-markdown-perl/current/lib/Text/Markdown.pm (original)
+++ branches/upstream/libtext-markdown-perl/current/lib/Text/Markdown.pm Thu Jul 24 18:14:33 2008
@@ -8,7 +8,7 @@
use Carp qw(croak);
use base 'Exporter';
-our $VERSION = '1.0.20';
+our $VERSION = '1.0.21';
our @EXPORT_OK = qw(markdown);
=head1 NAME
@@ -475,9 +475,10 @@
$text = $self->_HashHTMLBlocks($text) unless $self->{markdown_in_html_blocks};
# Do Horizontal Rules:
- $text =~ s{^[ ]{0,2}([ ]?\*[ ]?){3,}[ \t]*$}{\n<hr$self->{empty_element_suffix}\n}gmx;
- $text =~ s{^[ ]{0,2}([ ]? -[ ]?){3,}[ \t]*$}{\n<hr$self->{empty_element_suffix}\n}gmx;
- $text =~ s{^[ ]{0,2}([ ]? _[ ]?){3,}[ \t]*$}{\n<hr$self->{empty_element_suffix}\n}gmx;
+ my $less_than_tab = $self->{tab_width} - 1;
+ $text =~ s{^[ ]{0,$less_than_tab}(\*[ ]?){3,}[ \t]*$}{\n<hr$self->{empty_element_suffix}\n}gmx;
+ $text =~ s{^[ ]{0,$less_than_tab}(-[ ]?){3,}[ \t]*$}{\n<hr$self->{empty_element_suffix}\n}gmx;
+ $text =~ s{^[ ]{0,$less_than_tab}(_[ ]?){3,}[ \t]*$}{\n<hr$self->{empty_element_suffix}\n}gmx;
$text = $self->_DoLists($text);
Modified: branches/upstream/libtext-markdown-perl/current/lib/Text/MultiMarkdown.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-markdown-perl/current/lib/Text/MultiMarkdown.pm?rev=23533&op=diff
==============================================================================
--- branches/upstream/libtext-markdown-perl/current/lib/Text/MultiMarkdown.pm (original)
+++ branches/upstream/libtext-markdown-perl/current/lib/Text/MultiMarkdown.pm Thu Jul 24 18:14:33 2008
@@ -8,7 +8,7 @@
use Carp qw(croak);
use base qw(Text::Markdown);
-our $VERSION = '1.0.20';
+our $VERSION = '1.0.21';
our @EXPORT_OK = qw(markdown);
=head1 NAME
@@ -631,7 +631,7 @@
sub _StripFootnoteDefinitions {
my ($self, $text) = @_;
my $less_than_tab = $self->{tab_width} - 1;
-
+
while ($text =~ s{
\n\[\^([^\n]+?)\]\:[ \t]*# id = $1
\n?
@@ -1054,6 +1054,7 @@
my $count=0;
while ($line =~ /\|?\s*([^\|]+?)\s*(\|+|\Z)/gs) {
# process contents of each cell
+ no warnings 'uninitialized';
my $cell = $self->_RunSpanGamut($1);
my $ending = $2;
my $colspan = "";
Modified: branches/upstream/libtext-markdown-perl/current/script/MultiMarkdown.pl
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-markdown-perl/current/script/MultiMarkdown.pl?rev=23533&op=diff
==============================================================================
--- branches/upstream/libtext-markdown-perl/current/script/MultiMarkdown.pl (original)
+++ branches/upstream/libtext-markdown-perl/current/script/MultiMarkdown.pl Thu Jul 24 18:14:33 2008
@@ -5,7 +5,7 @@
=head1 NAME
-MultimMarkdown.pl - Convert MultiMarkdown syntax to (X)HTML
+MultiMarkdown.pl - Convert MultiMarkdown syntax to (X)HTML
=head1 DESCRIPTION
Modified: branches/upstream/libtext-markdown-perl/current/t/03podspelling.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-markdown-perl/current/t/03podspelling.t?rev=23533&op=diff
==============================================================================
--- branches/upstream/libtext-markdown-perl/current/t/03podspelling.t (original)
+++ branches/upstream/libtext-markdown-perl/current/t/03podspelling.t Thu Jul 24 18:14:33 2008
@@ -42,3 +42,8 @@
MDTest
preprocess
urls
+STDIN
+STDOUT
+XHTML
+html
+shortversion
Modified: branches/upstream/libtext-markdown-perl/current/t/23afulldocs-multimarkdown.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-markdown-perl/current/t/23afulldocs-multimarkdown.t?rev=23533&op=diff
==============================================================================
--- branches/upstream/libtext-markdown-perl/current/t/23afulldocs-multimarkdown.t (original)
+++ branches/upstream/libtext-markdown-perl/current/t/23afulldocs-multimarkdown.t Thu Jul 24 18:14:33 2008
@@ -11,8 +11,8 @@
plan tests => scalar(@files) + 1;
-use_ok('Text::Markdown');
+use_ok('Text::MultiMarkdown');
-my $m = Text::Markdown->new();
+my $m = Text::MultiMarkdown->new();
run_tests($m, $docsdir, @files);
Modified: branches/upstream/libtext-markdown-perl/current/t/32tabwidth.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-markdown-perl/current/t/32tabwidth.t?rev=23533&op=diff
==============================================================================
--- branches/upstream/libtext-markdown-perl/current/t/32tabwidth.t (original)
+++ branches/upstream/libtext-markdown-perl/current/t/32tabwidth.t Thu Jul 24 18:14:33 2008
@@ -1,6 +1,6 @@
use strict;
use warnings;
-use Test::More tests => 3;
+use Test::More tests => 4;
use_ok( 'Text::Markdown' );
@@ -22,4 +22,16 @@
is($m->markdown($instr) => $expstr, 'Correct (constructor)');
is(Text::Markdown->new->markdown($instr, { tab_width => 2}) => $expstr, 'Correct (markdown method option)');
+
+my $txt = $m->markdown(<<'END_MARKDOWN');
+This is a para.
+
+ This is code.
+ ---
+ This is code.
+
+This is a para.
+END_MARKDOWN
+
+unlike($txt, qr{<hr}, "no HR elements when the hr is in a code block");
Modified: branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Backslash_escapes.xhtml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Backslash_escapes.xhtml?rev=23533&op=diff
==============================================================================
--- branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Backslash_escapes.xhtml (original)
+++ branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Backslash_escapes.xhtml Thu Jul 24 18:14:33 2008
@@ -1,4 +1,4 @@
-<p>These should all get escaped:</p>
+These should all get escaped:<br />
<p>Backslash: \</p>
Added: branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Footnotes.text
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Footnotes.text?rev=23533&op=file
==============================================================================
--- branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Footnotes.text (added)
+++ branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Footnotes.text Thu Jul 24 18:14:33 2008
@@ -1,0 +1,4 @@
+
+Test footnote.[^1][].
+
+[^1]: This is a footnote.
Added: branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Footnotes.xhtml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Footnotes.xhtml?rev=23533&op=file
==============================================================================
--- branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Footnotes.xhtml (added)
+++ branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Footnotes.xhtml Thu Jul 24 18:14:33 2008
@@ -1,0 +1,12 @@
+<p>Test footnote.<a href="#fn:1" id="fnref:1" class="footnote">1</a>[].</p>
+
+<div class="footnotes">
+<hr/>
+
+<ol>
+<li id="fn:1">
+<p>This is a footnote.<a href="#fnref:1" class="reversefootnote"> ↩</a></p>
+</li>
+</ol>
+</div>
+
Modified: branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Inline_HTML_(Advanced).xhtml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Inline_HTML_%28Advanced%29.xhtml?rev=23533&op=diff
==============================================================================
--- branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Inline_HTML_(Advanced).xhtml (original)
+++ branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Inline_HTML_(Advanced).xhtml Thu Jul 24 18:14:33 2008
@@ -1,4 +1,4 @@
-<p>Simple block on one line:</p>
+Simple block on one line:<br />
<div>foo</div>
Modified: branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Ordered_and_unordered_lists.xhtml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Ordered_and_unordered_lists.xhtml?rev=23533&op=diff
==============================================================================
--- branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Ordered_and_unordered_lists.xhtml (original)
+++ branches/upstream/libtext-markdown-perl/current/t/MultiMarkdown.mdtest/Ordered_and_unordered_lists.xhtml Thu Jul 24 18:14:33 2008
@@ -1,4 +1,4 @@
-<h2>Unordered</h2>
+<h2 id="unordered">Unordered</h2>
<p>Asterisks tight:</p>
@@ -52,7 +52,7 @@
<li><p>Minus 3</p></li>
</ul>
-<h2>Ordered</h2>
+<h2 id="ordered">Ordered</h2>
<p>Tight:</p>
@@ -97,16 +97,12 @@
<li><p>Item 3.</p></li>
</ol>
-<h2>Nested</h2>
+<h2 id="nested">Nested</h2>
<ul>
<li>Tab
-<ul>
-<li>Tab
-<ul>
-<li>Tab</li>
-</ul></li>
-</ul></li>
+<ul><li>Tab
+<ul><li>Tab</li></ul></li></ul></li>
</ul>
<p>Here's another:</p>
@@ -114,11 +110,9 @@
<ol>
<li>First</li>
<li>Second:
-<ul>
-<li>Fee</li>
+<ul><li>Fee</li>
<li>Fie</li>
-<li>Foe</li>
-</ul></li>
+<li>Foe</li></ul></li>
<li>Third</li>
</ol>
@@ -128,10 +122,8 @@
<li><p>First</p></li>
<li><p>Second:</p>
-<ul>
-<li>Fee</li>
+<ul><li>Fee</li>
<li>Fie</li>
-<li>Foe</li>
-</ul></li>
+<li>Foe</li></ul></li>
<li><p>Third</p></li>
</ol>
Added: branches/upstream/libtext-markdown-perl/current/t/Text-Markdown.mdtest/CoreDumps5.8.text
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-markdown-perl/current/t/Text-Markdown.mdtest/CoreDumps5.8.text?rev=23533&op=file
==============================================================================
--- branches/upstream/libtext-markdown-perl/current/t/Text-Markdown.mdtest/CoreDumps5.8.text (added)
+++ branches/upstream/libtext-markdown-perl/current/t/Text-Markdown.mdtest/CoreDumps5.8.text Thu Jul 24 18:14:33 2008
@@ -1,0 +1,7 @@
+* Unordered
+1. Ordered
+
+Text
+
+* Unordered
+1. Ordered
Added: branches/upstream/libtext-markdown-perl/current/t/Text-Markdown.mdtest/CoreDumps5.8.xhtml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-markdown-perl/current/t/Text-Markdown.mdtest/CoreDumps5.8.xhtml?rev=23533&op=file
==============================================================================
--- branches/upstream/libtext-markdown-perl/current/t/Text-Markdown.mdtest/CoreDumps5.8.xhtml (added)
+++ branches/upstream/libtext-markdown-perl/current/t/Text-Markdown.mdtest/CoreDumps5.8.xhtml Thu Jul 24 18:14:33 2008
@@ -1,0 +1,15 @@
+<ul>
+<li>Unordered
+<ol>
+<li>Ordered</li>
+</ol></li>
+</ul>
+
+<p>Text</p>
+
+<ul>
+<li>Unordered
+<ol>
+<li>Ordered</li>
+</ol></li>
+</ul>
Added: branches/upstream/libtext-markdown-perl/current/t/Text-MultiMarkdown.mdtest/Warnings-rt34856.text
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-markdown-perl/current/t/Text-MultiMarkdown.mdtest/Warnings-rt34856.text?rev=23533&op=file
==============================================================================
--- branches/upstream/libtext-markdown-perl/current/t/Text-MultiMarkdown.mdtest/Warnings-rt34856.text (added)
+++ branches/upstream/libtext-markdown-perl/current/t/Text-MultiMarkdown.mdtest/Warnings-rt34856.text Thu Jul 24 18:14:33 2008
@@ -1,0 +1,5 @@
+
+
+| table | table | table |
+| | | |
+| a | b | c |
Added: branches/upstream/libtext-markdown-perl/current/t/Text-MultiMarkdown.mdtest/Warnings-rt34856.xhtml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-markdown-perl/current/t/Text-MultiMarkdown.mdtest/Warnings-rt34856.xhtml?rev=23533&op=file
==============================================================================
--- branches/upstream/libtext-markdown-perl/current/t/Text-MultiMarkdown.mdtest/Warnings-rt34856.xhtml (added)
+++ branches/upstream/libtext-markdown-perl/current/t/Text-MultiMarkdown.mdtest/Warnings-rt34856.xhtml Thu Jul 24 18:14:33 2008
@@ -1,0 +1,18 @@
+<table>
+<col />
+<col />
+<thead>
+<tr>
+ <th>table</th>
+ <th>table</th>
+ <th>table</th>
+</tr>
+</thead>
+<tbody>
+<tr>
+ <td>a</td>
+ <td>b</td>
+ <td>c</td>
+</tr>
+</tbody>
+</table>
Added: branches/upstream/libtext-markdown-perl/current/t/code-hr.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtext-markdown-perl/current/t/code-hr.t?rev=23533&op=file
==============================================================================
--- branches/upstream/libtext-markdown-perl/current/t/code-hr.t (added)
+++ branches/upstream/libtext-markdown-perl/current/t/code-hr.t Thu Jul 24 18:14:33 2008
@@ -1,0 +1,16 @@
+use strict;
+use warnings;
+use Text::Markdown 'markdown';
+use Test::More tests => 1;
+
+my $txt = markdown(<<'END_MARKDOWN', { tab_width => 2 });
+This is a para.
+
+ This is code.
+ ---
+ This is code.
+
+This is a para.
+END_MARKDOWN
+
+unlike($txt, qr{<hr}, "no HR elements when the hr is in a code block");
More information about the Pkg-perl-cvs-commits
mailing list