fix #119

lib/Text/Md2Inao.pm

@@ -58,8 +58,7 @@ sub use_special_italic {
 sub prepare_text_for_markdown {
     my $text = shift;
 
-    ## Work Around: 先頭空白は字下げとみなし全角空白に置き換える (issue #4)
-    $text =~ s/^[ ]{1,3}([^ <])/　$1/mg;
+    ## 先頭空白は字下げとみなして全角空白に置き換えていた仕様は撤回 (issue #4, #119)
 
     ## Work Around: リストの後にコードブロックが続くとだめな問題 (issue #6)
     $text =~ s!([-*+] .*?)\n\n    !$1\n\n　\n\n    !g;

t/99_rt_indent.t

@@ -36,19 +36,19 @@ World
 --- in md2inao
  Hello, World
 --- expected
-　Hello, World
+Hello, World
 
 === case 5
 --- in md2inao
   Hello, World
 --- expected
-　Hello, World
+Hello, World
 
 === case 6
 --- in md2inao
    Hello, World
 --- expected
-　Hello, World
+Hello, World
 
 === case 7
 --- in md2inao
@@ -83,18 +83,55 @@ print "Hello, world";
 
   blah blah
 --- expected
-　blah blah
+blah blah
 ◆list/◆
 use strict;
 use warnings;
 
 print "Hello, world";
 ◆/list◆
-　blah blah
+blah blah
 
 === case 10
 --- in md2inao
 　blah blah
 --- expected
 　blah blah
 
+=== case 11
+--- in md2id
+```
+0
+ 1
+  2
+   3
+    4
+```
+--- expected
+<SJIS-MAC>
+<ParaStyle:半行アキ>
+<ParaStyle:リスト>0
+<ParaStyle:リスト> 1
+<ParaStyle:リスト>  2
+<ParaStyle:リスト>   3
+<ParaStyle:リスト>    4
+
+=== case 12
+--- in md2id
+0
+
+ 1
+
+  2
+
+   3
+
+    4
+--- expected
+<SJIS-MAC>
+<ParaStyle:本文>0
+<ParaStyle:本文>1
+<ParaStyle:本文>2
+<ParaStyle:本文>3
+<ParaStyle:半行アキ>
+<ParaStyle:リスト>4

t/99_rt_list.t

@@ -13,11 +13,11 @@ __END__
 * Baz
 
   Piyo
---- expected
+--- expected -trim
 ・Foo
 ・Bar
 ・Baz
-　Piyo
+Piyo
 
 === case 2
 --- in md2inao
@@ -38,10 +38,10 @@ Piyo
 * あ
 
   い
---- expected
+--- expected -trim
 ・あ
 ・あ
-　い
+い
 
 === case 4
 --- in md2inao
@@ -96,12 +96,12 @@ Piyo
   bar
 
   baz
---- expected
-　blah blah
+--- expected -trim
+blah blah
 ・Hoge
 ・Foo
-　bar
-　baz
+bar
+baz
 
 === case 8
 --- in md2inao