about summary refs log tree commit diff
path: root/src/guile/skribilo.scm
diff options
context:
space:
mode:
Diffstat (limited to 'src/guile/skribilo.scm')
-rw-r--r--src/guile/skribilo.scm6
1 files changed, 1 insertions, 5 deletions
diff --git a/src/guile/skribilo.scm b/src/guile/skribilo.scm
index 7d066da..985e0cd 100644
--- a/src/guile/skribilo.scm
+++ b/src/guile/skribilo.scm
@@ -387,11 +387,7 @@ options."
         (if input-file
             (with-input-from-file input-file
               (lambda ()
-                (cond-expand (guile-2
-                              ;; Use the encoding specified by the `coding:'
-                              ;; comment.
-                              (let ((p (current-input-port)))
-                                (set-port-encoding! p (file-encoding p)))))
+                (set-correct-file-encoding!)
                 (doskribe user-module)))
             (doskribe user-module))