branch: externals/yaml
commit 7783d802b075a7d49e70766b3845c84c710fa8b6
Author: Zachary Romero <zacrom...@posteo.net>
Commit: Zachary Romero <zacrom...@posteo.net>
Don't remove all properties, just yaml-n
---
yaml.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/yaml.el b/yaml.el
index a715d3d4d8..0ed3667808 100644
--- a/yaml.el
+++ b/yaml.el
@@ -261,7 +261,7 @@ This flag is intended for development purposes.")
(defun yaml--process-literal-text (text)
"Remove the header line for a folded match and return TEXT body formatted."
(let ((n (get-text-property 0 'yaml-n text)))
- (setq text (substring-no-properties text 0 (length text)))
+ (remove-text-properties 0 (length text) '(yaml-n nil) text)
(let* ((header-line (substring text 0 (string-match "\n" text)))
(text-body (substring text (1+ (string-match "\n" text))))
(parsed-header (yaml--parse-block-header header-line))
