From 4a98a67526954d161e92cce82baa317ad5df761d Mon Sep 17 00:00:00 2001
From: Jan Nieuwenhuizen <janneke@gnu.org>
Date: Mon, 5 Apr 2004 22:38:22 +0000
Subject: [PATCH] *** empty log message ***

---
 scm/encoding.scm | 1 +
 scm/lily.scm     | 4 ++++
 2 files changed, 5 insertions(+)

diff --git a/scm/encoding.scm b/scm/encoding.scm
index fee474e7e5..3c37774307 100644
--- a/scm/encoding.scm
+++ b/scm/encoding.scm
@@ -36,6 +36,7 @@
 
 (define encoding-alist '())
 
+;; TODO: run this once and 'cache' output of (write lst) in <coding>.scm ?
 (define (read-coding-file coding)
   (let* ((raw (ly:gulp-file (assoc-get coding coding-file-alist)))
 	 ;;(raw (ly:gulp-file "f7b6d320.enc"))
diff --git a/scm/lily.scm b/scm/lily.scm
index c6ebdfb2e1..928ebefbaa 100644
--- a/scm/lily.scm
+++ b/scm/lily.scm
@@ -10,6 +10,10 @@
 (if (defined? 'set-debug-cell-accesses!)
     (set-debug-cell-accesses! #f))
 
+;; ugh, need this for encoding.scm test
+;; srfi-13 overrides string->list
+(define plain-string->list string->list)
+
 (use-modules (ice-9 regex)
 	     (ice-9 safe)
 	     (oop goops)
-- 
2.39.2