From 2e4a1e1f7e99dec3eba6da6c8355461cbd4d7a0a Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Fri, 27 Jan 1995 07:18:11 +0000
Subject: [PATCH] (struct buffer): New field point_before_scroll.

---
 src/buffer.h | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/buffer.h b/src/buffer.h
index 16d8bc68f8f..76cbf0ba4c0 100644
--- a/src/buffer.h
+++ b/src/buffer.h
@@ -382,6 +382,10 @@ struct buffer
        indirect buffer, this holds a marker that records
        ZV for this buffer when the buffer is not current.  */
     Lisp_Object zv_marker;
+
+    /* This holds the point value before the last scroll operation.
+       Explicitly setting point sets this to nil.  */
+    Lisp_Object point_before_scroll;
   };
 
 /* This points to the current buffer.  */
-- 
2.39.5