branch: externals/yaml
commit 0ac7f365bb6b4507259b31679bb37ac291e1f1c7
Merge: bdfaa8ce55 94ea32ecb7
Author: Zachary Romero <[email protected]>
Commit: GitHub <[email protected]>
Merge pull request #41 from zkry/fix-property-prop-bug
Don't remove all properties, just yaml-n
---
yaml.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/yaml.el b/yaml.el
index a715d3d4d8..ff5de1ed21 100644
--- a/yaml.el
+++ b/yaml.el
@@ -3,7 +3,7 @@
;; Copyright © 2021 Zachary Romero <[email protected]>
;; Author: Zachary Romero <[email protected]>
-;; Version: 0.5.0
+;; Version: 0.5.1
;; Homepage: https://github.com/zkry/yaml.el
;; Package-Requires: ((emacs "25.1"))
;; Keywords: tools
@@ -45,7 +45,7 @@
(require 'seq)
(require 'cl-lib)
-(defconst yaml-parser-version "0.5.0")
+(defconst yaml-parser-version "0.5.1")
(defvar yaml--parse-debug nil
"Turn on debugging messages when parsing YAML when non-nil.
@@ -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))
