summaryrefslogtreecommitdiff
path: root/libguile/read.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/read.c')
-rw-r--r--libguile/read.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/read.c b/libguile/read.c
index c7ba4e7e4..9e072ad67 100644
--- a/libguile/read.c
+++ b/libguile/read.c
@@ -2068,7 +2068,7 @@ scm_i_scan_for_encoding (SCM port)
buf = pt->read_buf;
if (pt->rw_random)
- scm_flush_unlocked (port);
+ scm_flush (port);
if (scm_port_buffer_can_take (buf) == 0)
{