summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorLudovic Courtès2018-04-29 23:37:08 +0200
committerLudovic Courtès2018-04-29 23:41:18 +0200
commit4776e2f3638d5d0c219e6464380ac4105bb145d4 (patch)
treeb3582b677057b768b3549a049f9acbdce4c13b73 /src
parentfea4fef2c2084b8c0f8311e61d6dcdd7c652f6d4 (diff)
downloadskribilo-4776e2f3638d5d0c219e6464380ac4105bb145d4.tar.gz
skribilo-4776e2f3638d5d0c219e6464380ac4105bb145d4.tar.lz
skribilo-4776e2f3638d5d0c219e6464380ac4105bb145d4.zip
slide/html: Do not emit <strong> and <big>.
* src/guile/skribilo/package/slide/html.scm (html-slide-title): Remove <strong> and <big>.
Diffstat (limited to 'src')
-rw-r--r--src/guile/skribilo/package/slide/html.scm8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/guile/skribilo/package/slide/html.scm b/src/guile/skribilo/package/slide/html.scm
index 723e5dc..0e37e90 100644
--- a/src/guile/skribilo/package/slide/html.scm
+++ b/src/guile/skribilo/package/slide/html.scm
@@ -120,13 +120,13 @@
(display "<center>")
(if (string? tfont)
(begin
- (format #t "<font ~a><strong>" tfont)
+ (format #t "<font ~a>" tfont)
(output title e)
- (display "</strong></font>"))
+ (display "</font>"))
(begin
- (display "<div class=\"skribilo-title\"><strong><big><big><big>")
+ (display "<div class=\"skribilo-title\">")
(output title e)
- (display "</big></big></big></strong</div>")))
+ (display "</div>")))
(display "</center>\n")))
(if (not authors)
(display "\n")