From 96ed8a1e3f547bf13a2cbd80879cbfb1c6157520 Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Wed, 17 Jan 2001 21:57:39 +0000 Subject: [PATCH] ... original commit: 4f3059727a34748bccdd384c9ea9ec3b28a6adad --- collects/framework/frame.ss | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/collects/framework/frame.ss b/collects/framework/frame.ss index 37dab2fc..f7129ffc 100644 --- a/collects/framework/frame.ss +++ b/collects/framework/frame.ss @@ -400,8 +400,8 @@ (let* ([edit (get-info-editor)] [make-one (lambda (pos) - (let* ([line (send edit position-line pos)] - [line-start (send edit line-start-position line)] + (let* ([line (send edit position-paragraph pos)] + [line-start (send edit paragraph-start-position line)] [char (- pos line-start)]) (if line-numbers? (format "~a:~a"