From 3dd7ed200f8d2e2d9aaf8257f8bc3d6b78fb2aba Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Bj=C3=B6rn=20Lindqvist?= Date: Sun, 9 Jul 2017 10:39:16 +0200 Subject: [PATCH] FUEL: fixing markup to indent multiline code correctly --- misc/fuel/fuel-markup.el | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) diff --git a/misc/fuel/fuel-markup.el b/misc/fuel/fuel-markup.el index f69ad844a9..cd8dd6a50c 100644 --- a/misc/fuel/fuel-markup.el +++ b/misc/fuel/fuel-markup.el @@ -307,11 +307,12 @@ (fuel-markup--insert-nl-if-nb) (newline) (dolist (snip (cdr e)) - (when indent (insert " ")) - (if (stringp snip) - (insert (factor-font-lock-string snip)) - (fuel-markup--print snip)) - (newline)) + (unless (stringp snip) + (error "snip is not a string")) + (dolist (line (split-string (factor-font-lock-string snip) "\n")) + (when indent (insert " ")) + (insert line) + (newline))) (newline)) (defun fuel-markup--command (e)