# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 932593432 0
# Node ID b4fa5b2f7e8c4b00f6566020ffce9ccbfa49c738
# Parent  c5eb87f3571e80e6148963919e57ce8b96be8272
(POSN_STRING): New.

diff -r c5eb87f3571e -r b4fa5b2f7e8c src/keyboard.h
--- a/src/keyboard.h	Wed Jul 21 21:43:52 1999 +0000
+++ b/src/keyboard.h	Wed Jul 21 21:43:52 1999 +0000
@@ -265,6 +265,11 @@
   (XCONS (XCONS (XCONS (XCONS (posn)->cdr)->cdr)->cdr)->car)
 #define POSN_SCROLLBAR_PART(posn)	(Fnth ((posn), make_number (4)))
 
+/* A cons (STRING . STRING-CHARPOS), or nil in mouse-click events.
+   It's a cons if the click is over a string in the mode line.  */
+
+#define POSN_STRING(POSN) Fnth (make_number (4), (POSN))
+
 /* Some of the event heads.  */
 extern Lisp_Object Qswitch_frame;
 
@@ -284,7 +289,7 @@
   (Fget ((event_head), Qevent_kind))
 
 /* Symbols to use for non-text mouse positions.  */
-extern Lisp_Object Qmode_line, Qvertical_line;
+extern Lisp_Object Qmode_line, Qvertical_line, Qtop_line;
 
 /* Forward declaration for prototypes.  */
 struct input_event;