summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNikita Domnitskii <nikita@domnitskii.me>2024-03-14 17:11:23 +0600
committerRob Browning <rlb@defaultvalue.org>2024-04-05 17:51:33 -0500
commit025bb024ae4b586dc721e3d2e3471fbea5f8cc81 (patch)
tree4acd957417524b723790734a021e72d69317d78c
parent48548df91e9eb5d4a46391da0ad0a8cdd3387857 (diff)
downloadguile-025bb024ae4b586dc721e3d2e3471fbea5f8cc81.tar.gz
eval-string: set port column to column, not line
* module/ice-9/eval-string.scm: set column to column, not line.
-rw-r--r--module/ice-9/eval-string.scm2
1 files changed, 1 insertions, 1 deletions
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