summaryrefslogtreecommitdiff
path: root/libguile/print.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/print.c')
-rw-r--r--libguile/print.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/print.c b/libguile/print.c
index 8dcd375f9..b0e6691ff 100644
--- a/libguile/print.c
+++ b/libguile/print.c
@@ -1126,7 +1126,7 @@ display_string (const void *str, int narrow_p,
{
scm_t_port *pt;
- pt = SCM_PTAB_ENTRY (port);
+ pt = SCM_PORT (port);
if (scm_is_eq (pt->encoding, sym_UTF_8))
return display_string_as_utf8 (str, narrow_p, len, port);