From 3d1bc8a646e80606ced51c0df52bfbe881f233eb Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Tue, 17 Nov 1992 06:05:39 +0000
Subject: [PATCH] Fixes to last set of changes.
---
v7/src/edwin/comint.scm | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/v7/src/edwin/comint.scm b/v7/src/edwin/comint.scm
index a234f1b6a..ebc5c7d72 100644
--- a/v7/src/edwin/comint.scm
+++ b/v7/src/edwin/comint.scm
@@ -1,6 +1,6 @@
#| -*-Scheme-*-
-$Id: comint.scm,v 1.16 1992/11/16 22:40:54 cph Exp $
+$Id: comint.scm,v 1.17 1992/11/17 06:05:39 cph Exp $
Copyright (c) 1991-1992 Massachusetts Institute of Technology
@@ -128,7 +128,7 @@ Entry to this mode runs the hooks on comint-mode-hook."
(make-ring (ref-variable comint-input-ring-size)))
(define-variable-local-value! buffer
(ref-variable-object comint-last-input-end)
- (mark-right-inserting-copy (buffer-end (current-buffer))))
+ (mark-right-inserting-copy (buffer-end buffer)))
(define-variable-local-value! buffer
(ref-variable-object comint-last-input-match)
false)
--
2.25.1