On 2/02/2025 20:51, H. Müller wrote:
- (encoding (string->symbol (fluid-ref %default-port-encoding)))
+ (encoding (if (string? (fluid-ref %default-port-encoding))
+(string->symbol (fluid-ref %default-port-encoding))
+(fluid-ref %de
>From 72b85f8e6a369e6aef4c6bd6bb233c0cacb80b03 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hannes=20M=C3=BCller?= <>
Date: Sat, 21 Dec 2024 16:55:13 +0100
Subject: [PATCH] Fix make-custom-port in case encoding is #f
* module/ice-9/custom-ports.scm (make-custom-port): Code fails if
(
