AutoEpub3/AutoEpub8.vb (diff) AutoEpub3/Files/OEBPS/stylesheet.css (diff) AutoEpub3/Logic/DEP3/cDep3_006.vb (diff)| @@ -128,7 +128,7 @@ | ||
| 128 | 128 | |
| 129 | 129 | |
| 130 | 130 | Dim cEpub As New cEpub6(emEpub6.emEncCode.GB2321, emEpub6.emLan.ZH, "岩波日本史", "岩波出版社", "DYGW01_202009") |
| 131 | - cEpub.bConvertToMobi = False | |
| 131 | + cEpub.bConvertToMobi = True | |
| 132 | 132 | cEpub.CreateEpub(cAutoEpub.mEpub) |
| 133 | 133 | MessageBox.Show("Finished") |
| 134 | 134 | System.Diagnostics.Process.Start(cEpub.sOutPutPathFolder) |
| @@ -102,8 +102,8 @@ | ||
| 102 | 102 | } |
| 103 | 103 | |
| 104 | 104 | .mobiTitleSub { |
| 105 | - text-indent: 4em; | |
| 106 | - font-size: 1.05em; | |
| 105 | + text-indent: 0em; | |
| 106 | + font-size: 1.00em; | |
| 107 | 107 | margin-bottom: 1em; |
| 108 | 108 | font-weight: bold; |
| 109 | 109 | } |
| @@ -159,9 +159,7 @@ | ||
| 159 | 159 | |
| 160 | 160 | If uHtmlNode.Name = "h3" Then |
| 161 | 161 | Dim sTarget As String = uHtmlNode.InnerHtml |
| 162 | - If listMobiRight.Any(Function(x) uHtmlNode.OuterHtml.Contains(x)) Then | |
| 163 | - sTarget = sTarget + emEpub6.spDl_Right | |
| 164 | - End If | |
| 162 | + sTarget = sTarget + emEpub6.spText_SubTitle | |
| 165 | 163 | GetListText.Add(sTarget) |
| 166 | 164 | End If |
| 167 | 165 |
