* lread.c (read_filtered_event): Use duration_to_sec_usec.

[bpt/emacs.git] / src / lread.c

diff --git a/src/lread.c b/src/lread.c
index 7b3e0df..e427688 100644 (file)
--- a/src/lread.c
+++ b/src/lread.c
@@ -608,8 +608,11 @@ read_filtered_event (int no_switch_frame, int ascii_required,
       int sec, usec;
       double duration = extract_float (seconds);
 
-      sec  = (int) duration;
-      usec = (duration - sec) * 1000000;
+      if (0 < duration)
+       duration_to_sec_usec (duration, &sec, &usec);
+      else
+       sec = usec = 0;
+
       EMACS_GET_TIME (end_time);
       EMACS_SET_SECS_USECS (wait_time, sec, usec);
       EMACS_ADD_TIME (end_time, end_time, wait_time);