master 655d2319bc: Use x-show-tooltip-timeout in all the implementations

[Lars Ingebrigtsen]

branch: master
commit 655d2319bc50ee09d4acaf9ce90809f9476d8674
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Use x-show-tooltip-timeout in all the implementations
    
    * src/haikufns.c (Fx_show_tip): Use the timeout variable.
    * src/pgtkfns.c (Fx_show_tip): Ditto.
    
    * src/w32fns.c (Fx_show_tip): Ditto.
    
    * src/xfns.c (Fx_show_tip): Doc fix.
---
 src/haikufns.c | 5 ++---
 src/pgtkfns.c  | 8 ++++----
 src/w32fns.c   | 5 ++---
 src/xfns.c     | 3 ++-
 4 files changed, 10 insertions(+), 11 deletions(-)

diff --git a/src/haikufns.c b/src/haikufns.c
index fb79066b77..f7c17567b1 100644
--- a/src/haikufns.c
+++ b/src/haikufns.c
@@ -2021,9 +2021,8 @@ DEFUN ("x-show-tip", Fx_show_tip, Sx_show_tip, 1, 6, 0,
   f = decode_window_system_frame (frame);
 
   if (NILP (timeout))
-    timeout = make_fixnum (5);
-  else
-    CHECK_FIXNAT (timeout);
+    timeout = Vx_show_tooltip_timeout;
+  CHECK_FIXNAT (timeout);
 
   if (NILP (dx))
     dx = make_fixnum (5);
diff --git a/src/pgtkfns.c b/src/pgtkfns.c
index d1a72804cf..a0fcf70f31 100644
--- a/src/pgtkfns.c
+++ b/src/pgtkfns.c
@@ -3092,7 +3092,8 @@ PARMS is an optional list of frame parameters which can 
be used to
 change the tooltip's appearance.
 
 Automatically hide the tooltip after TIMEOUT seconds.  TIMEOUT nil
-means use the default timeout of 5 seconds.
+means use the default timeout from the `x-show-tooltip-timeout'
+variable.
 
 If the list of frame parameters PARMS contains a `left' parameter,
 display the tooltip at that x-position.  If the list of frame parameters
@@ -3138,9 +3139,8 @@ Text larger than the specified size is clipped.  */)
     return unbind_to (count, Qnil);
 
   if (NILP (timeout))
-    timeout = make_fixnum (5);
-  else
-    CHECK_FIXNAT (timeout);
+    timeout = Vx_show_tooltip_timeout;
+  CHECK_FIXNAT (timeout);
 
   if (NILP (dx))
     dx = make_fixnum (5);
diff --git a/src/w32fns.c b/src/w32fns.c
index ead1549d55..0f25c1a594 100644
--- a/src/w32fns.c
+++ b/src/w32fns.c
@@ -7366,9 +7366,8 @@ DEFUN ("x-show-tip", Fx_show_tip, Sx_show_tip, 1, 6, 0,
   decode_window_system_frame (frame);
 
   if (NILP (timeout))
-    timeout = make_fixnum (5);
-  else
-    CHECK_FIXNAT (timeout);
+    timeout = Vx_show_tooltip_timeout;
+  CHECK_FIXNAT (timeout);
 
   if (NILP (dx))
     dx = make_fixnum (5);
diff --git a/src/xfns.c b/src/xfns.c
index 24c3c26022..8f17ee67cd 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -8292,7 +8292,8 @@ PARMS is an optional list of frame parameters which can 
be used to
 change the tooltip's appearance.
 
 Automatically hide the tooltip after TIMEOUT seconds.  TIMEOUT nil
-means use the default timeout from the `x-show-tooltip-timeout'.
+means use the default timeout from the `x-show-tooltip-timeout'
+variable.
 
 If the list of frame parameters PARMS contains a `left' parameter,
 display the tooltip at that x-position.  If the list of frame parameters