From e64acfac83e5d4150af630e6b0cc1ffc42279405 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Mon, 26 Apr 2021 14:07:51 +0530
Subject: Escape asterisk characters in scm->yaml.

* ccwl/yaml.scm (display-atom): Escape asterisk characters.
* tests/yaml.scm ("strings with asterisk characters should be
escaped"): New test.
---
 tests/yaml.scm | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'tests/yaml.scm')

diff --git a/tests/yaml.scm b/tests/yaml.scm
index 073f1e5..70c6cea 100644
--- a/tests/yaml.scm
+++ b/tests/yaml.scm
@@ -34,4 +34,9 @@ bar: {}
 "
   (scm->yaml-string #("-1")))
 
+(test-equal "strings with asterisk characters should be escaped"
+  "- \"*foo\"
+"
+  (scm->yaml-string #("*foo")))
+
 (test-end "yaml")
-- 
cgit v1.2.3