FIX: using MOLD/ONLY instead of FORM when saving data as a *.txt file

Related to: metaeducation/rebol-issues#1755
Oldes · May 29, 2019 · eef497e · eef497e
1 parent 88ec458
commit eef497e
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 1 deletion.
diff --git a/src/mezz/sys-codec.r b/src/mezz/sys-codec.r
@@ -69,7 +69,7 @@ encode: function [
 		data: either handle? try [cod/entry] [
 			; original codecs were only natives
 			if type = 'text [
-				return either binary? data [to string! data][form data]
+				return either binary? data [to string! data][mold/only data]
 			]
 			do-codec cod/entry 'encode data
 		][

diff --git a/src/tests/units/codecs-test.r3 b/src/tests/units/codecs-test.r3
@@ -34,6 +34,7 @@ Rebol [
 	--test-- "SAVE %test.txt"
 		--assert [1 2]   = load save %temp.bin [1 2]
 		--assert "1 2"   = load save %temp.txt [1 2]     ;-- note that result is STRING
+		--assert "%a %b" = load save %temp.txt [%a %b] 
 		--assert "1 2^/" = read/string %temp.bin ;@@ should be there the newline char?!
 		--assert "1 2"   = read/string %temp.txt