AutoEpub3/AutoEpub6.vb (diff) AutoEpub3/cEpub6.vb (diff)| @@ -219,7 +219,7 @@ | ||
| 219 | 219 | For Each edit As String In listTemp |
| 220 | 220 | |
| 221 | 221 | If edit.IndexOf("quote") > -1 Then |
| 222 | - listKK.Add(edit.Replace(" class=""quote"">", "divSP1div")) | |
| 222 | + listKK.Add(edit.Replace(" class=""quote"">", emEpub6.spText_EmDash)) | |
| 223 | 223 | |
| 224 | 224 | Else |
| 225 | 225 | listKK.Add(edit.Replace(">", "")) |
| @@ -794,35 +794,31 @@ | ||
| 794 | 794 | |
| 795 | 795 | End Function |
| 796 | 796 | |
| 797 | - | |
| 798 | 797 | Private Function htmlAddText(ByVal sText As String) As String |
| 799 | 798 | |
| 799 | + Dim bSP As Boolean = False | |
| 800 | + | |
| 800 | 801 | Dim sbText As New StringBuilder() |
| 801 | 802 | |
| 802 | - If sText.IndexOf("divSP1div") > -1 Then | |
| 803 | - sText = sText.Replace("divSP1div", "") | |
| 804 | - sbText.Append("<p class=""mobiTextSP1"">") | |
| 805 | - | |
| 806 | - sbText.Append("[") | |
| 807 | - sbText.Append(sText) | |
| 808 | - sbText.Append("]") | |
| 809 | - | |
| 810 | - | |
| 811 | - Else | |
| 812 | - sbText.Append("<p class=""mobiText"">") | |
| 813 | - sbText.Append(sText) | |
| 803 | + If sText.IndexOf(emEpub6.spText_EmDash) > -1 Then | |
| 804 | + sText = sText.Replace(emEpub6.spText_EmDash, "——") | |
| 805 | + bSP = True | |
| 814 | 806 | End If |
| 815 | 807 | |
| 816 | - | |
| 817 | - | |
| 818 | - | |
| 819 | - | |
| 808 | + sbText.Append("<p class=""mobiText"">") | |
| 809 | + sbText.Append(sText) | |
| 820 | 810 | If sText.Trim() = "" Then |
| 821 | 811 | sbText.Append(" ") |
| 822 | 812 | End If |
| 823 | 813 | sbText.Append("</p>") |
| 814 | + | |
| 815 | + If bSP Then | |
| 816 | + sbText.Append("<p class=""mobiText""> </p>") | |
| 817 | + End If | |
| 818 | + | |
| 824 | 819 | htmlAddText = sbText.ToString().Replace("［＃２字下げ］", " ") |
| 825 | 820 | |
| 821 | + | |
| 826 | 822 | End Function |
| 827 | 823 | |
| 828 | 824 | Private Function htmlAddImg(ByVal sText As String) As String |
| @@ -1073,4 +1069,7 @@ | ||
| 1073 | 1069 | Dep3 |
| 1074 | 1070 | End Enum |
| 1075 | 1071 | |
| 1072 | + Public Const spText_EmDash As String = "spText_EmDash" | |
| 1073 | + | |
| 1074 | + | |
| 1076 | 1075 | End Class |
| \ No newline at end of file |