diff --git a/lisp/ox-html.el b/lisp/ox-html.el
index fc91e9609..3ad3ffe3a 100644
--- a/lisp/ox-html.el
+++ b/lisp/ox-html.el
@@ -2679,12 +2679,14 @@ CONTENTS is nil. INFO is a plist holding contextual information."
"Transcode an INLINE-SRC-BLOCK element from Org to HTML.
CONTENTS holds the contents of the item. INFO is a plist holding
contextual information."
- (let ((lang (org-element-property :language inline-src-block))
- (code (org-element-property :value inline-src-block))
- (label
- (let ((lbl (and (org-element-property :name inline-src-block)
- (org-export-get-reference inline-src-block info))))
- (if (not lbl) "" (format " id=\"%s\"" lbl)))))
+ (let* ((lang (org-element-property :language inline-src-block))
+ (code (org-html-fontify-code
+ (org-element-property :value inline-src-block)
+ lang))
+ (label
+ (let ((lbl (and (org-element-property :name inline-src-block)
+ (org-export-get-reference inline-src-block info))))
+ (if (not lbl) "" (format " id=\"%s\"" lbl)))))
(format "%s
" lang label code)))
;;;; Inlinetask