From: Eli Zaretskii <eliz@gnu.org>
Date: Fri, 9 Jun 2006 09:05:17 +0000 (+0000)
Subject: (window_scroll_pixel_based): Signal "Beginning of buffer" when scroll-down
X-Git-Tag: emacs-pretest-22.0.90~2013
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cf402f3fd45d30524747dc8161f768f234adc6c0;p=emacs.git

(window_scroll_pixel_based): Signal "Beginning of buffer" when scroll-down
at the beginning of an empty buffer.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index 708122e35fa..c095f3e66c3 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2006-06-09  Eli Zaretskii  <eliz@gnu.org>
+
+	* window.c (window_scroll_pixel_based): Signal "Beginning of
+	buffer" when scroll-down at the beginning of an empty buffer.
+
 2006-06-06  YAMAMOTO Mitsuharu  <mituharu@math.s.chiba-u.ac.jp>
 
 	* macterm.c [USE_MAC_TSM] (mac_handle_text_input_event): Exclude
diff --git a/src/window.c b/src/window.c
index acb4c5cfbdd..e0ea9beb211 100644
--- a/src/window.c
+++ b/src/window.c
@@ -4895,6 +4895,8 @@ window_scroll_pixel_based (window, n, whole, noerror)
 	    }
 	  else if (noerror)
 	    return;
+	  else if (n < 0)	/* could happen with empty buffers */
+	    Fsignal (Qbeginning_of_buffer, Qnil);
 	  else
 	    Fsignal (Qend_of_buffer, Qnil);
 	}