changeset 26788:5e97315b6f11

* keyboard.c (Qratio): New symbol. (scroll_bar_parts): Add `Qratio' to it. (syms_of_keyboard): Init `Qratio'.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Fri, 10 Dec 1999 01:39:53 +0000
parents 5379722b5468
children 03a6016a38bf
files src/keyboard.c
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/keyboard.c	Fri Dec 10 01:39:30 1999 +0000
+++ b/src/keyboard.c	Fri Dec 10 01:39:53 1999 +0000
@@ -4012,12 +4012,12 @@
 /* Scroll bar parts.  */
 Lisp_Object Qabove_handle, Qhandle, Qbelow_handle;
 Lisp_Object Qup, Qdown, Qbottom, Qend_scroll;
-Lisp_Object Qtop;
+Lisp_Object Qtop, Qratio;
 
 /* An array of scroll bar parts, indexed by an enum scroll_bar_part value.  */
 Lisp_Object *scroll_bar_parts[] = {
   &Qabove_handle, &Qhandle, &Qbelow_handle,
-  &Qup, &Qdown, &Qtop, &Qbottom, &Qend_scroll
+  &Qup, &Qdown, &Qtop, &Qbottom, &Qend_scroll, &Qratio
 };
 
 /* User signal events.  */
@@ -9621,6 +9621,8 @@
   staticpro (&Qbottom);
   Qend_scroll = intern ("end-scroll");
   staticpro (&Qend_scroll);
+  Qratio = intern ("ratio");
+  staticpro (&Qratio);
 
   Qevent_kind = intern ("event-kind");
   staticpro (&Qevent_kind);