[PATCH] eval-string: Fix setting port column

[Nikita Domnitskii]

---
 module/ice-9/eval-string.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/module/ice-9/eval-string.scm b/module/ice-9/eval-string.scm
index ea0f17777..9cac03632 100644
--- a/module/ice-9/eval-string.scm
+++ b/module/ice-9/eval-string.scm
@@ -81,7 +81,7 @@
           (if line
               (set-port-line! port line))
           (if column
-              (set-port-column! port line))
+              (set-port-column! port column))
 
           (if (or compile? (not (language-evaluator lang)))
               ((load-thunk-from-memory


-- 
Best Regards,
Nikita Domnitskii