@@ -584,7 +584,7 @@ | ||
584 | 584 | 'cTools.dlImgFromUrl(sPngUrl, sImgFullName) |
585 | 585 | 'Dim sImg = sImgName & emEpub6.spText_Img |
586 | 586 | |
587 | - sHtml = Regex.Replace(sHtml, "\u2028", String.Empty) | |
587 | + sHtml = Regex.Replace(sHtml, "[\u2028-\u2029]", String.Empty) | |
588 | 588 | |
589 | 589 | Dim listSp As List(Of String) = cTools.listNav_SE(sHtml, "<h2>まとめ</h2>", vbLf & vbLf, True) |
590 | 590 |