From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Fri, 10 Dec 1999 01:39:53 +0000 (+0000)
Subject: * keyboard.c (Qratio): New symbol.
X-Git-Tag: emacs-pretest-21.0.90~5814
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=eef28553ffebf3442261648784bf71b93cfe2796;p=emacs.git

* keyboard.c (Qratio): New symbol.
(scroll_bar_parts): Add `Qratio' to it.
(syms_of_keyboard): Init `Qratio'.
---

diff --git a/src/keyboard.c b/src/keyboard.c
index 05efd6908d8..be6acd31b54 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -4012,12 +4012,12 @@ static char *lispy_drag_n_drop_names[] =
 /* 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 @@ syms_of_keyboard ()
   staticpro (&Qbottom);
   Qend_scroll = intern ("end-scroll");
   staticpro (&Qend_scroll);
+  Qratio = intern ("ratio");
+  staticpro (&Qratio);
 
   Qevent_kind = intern ("event-kind");
   staticpro (&Qevent_kind);