From d6985b6fe9e744e30e5d824b6c34f49ffaba9138 Mon Sep 17 00:00:00 2001
From: ram <ram>
Date: Fri, 25 Jan 1991 14:04:29 +0000
Subject: [PATCH] Fixed EDITOR-COMPILE-REGION to use the :SOURCE-INFO arg to
 COMPILE-FROM-STREAM instead of :DEFINED-FROM-PATHNAME.

---
 hemlock/lispbuf.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/hemlock/lispbuf.lisp b/hemlock/lispbuf.lisp
index 81e58e6ad..843a30bd6 100644
--- a/hemlock/lispbuf.lisp
+++ b/hemlock/lispbuf.lisp
@@ -429,7 +429,7 @@
    (with-input-from-region (stream region)
      (with-pop-up-display (*error-output* :height 19)
        (c::compile-from-stream stream
-			       :defined-from-pathname
+			       :source-info
 			       (buffer-pathname (current-buffer)))))))
 
 
-- 
GitLab