aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorRichard M. Stallman1996-03-07 20:21:29 +0000
committerRichard M. Stallman1996-03-07 20:21:29 +0000
commit82721b77dc60dbaada0116858f48c0f0b9076c4e (patch)
treee9174475f73bdaf3c359515c013422893c4b6258 /src
parent4a438fc5174459a044df208373a43e737c2c714b (diff)
downloademacs-82721b77dc60dbaada0116858f48c0f0b9076c4e.tar.gz
emacs-82721b77dc60dbaada0116858f48c0f0b9076c4e.zip
(check_timer): Remove code for dos-display-time.
(syms_of_msdos): Delete dos-display-time Lisp var.
Diffstat (limited to 'src')
-rw-r--r--src/msdos.c40
1 files changed, 0 insertions, 40 deletions
diff --git a/src/msdos.c b/src/msdos.c
index 6f175da71a8..5507416210d 100644
--- a/src/msdos.c
+++ b/src/msdos.c
@@ -2553,9 +2553,6 @@ unrequest_sigio () {}
2553#include "sysselect.h" 2553#include "sysselect.h"
2554 2554
2555static struct time last_time = {120, 120, 120, 120}; 2555static struct time last_time = {120, 120, 120, 120};
2556static int modeline_time_displayed = 0;
2557
2558Lisp_Object Vdos_display_time;
2559 2556
2560static void 2557static void
2561check_timer (t) 2558check_timer (t)
@@ -2575,39 +2572,6 @@ check_timer (t)
2575 && sec == last_time.ti_sec) 2572 && sec == last_time.ti_sec)
2576 return; 2573 return;
2577 2574
2578 if (!NILP (Vdos_display_time))
2579 {
2580 int interval;
2581 Lisp_Object dti = XSYMBOL (Fintern_soft (build_string ("display-time-interval"), Qnil))->value;
2582 int delta_time = ((hour - last_time.ti_hour) * 3600
2583 + (min - last_time.ti_min) * 60
2584 + (sec - last_time.ti_sec));
2585
2586 /* Who knows what the user may put into `display-time-interval'? */
2587 if (!INTEGERP (dti) || (interval = XINT (dti)) <= 0)
2588 interval = 60;
2589
2590 /* When it's time to renew the display, fake a `wakeup' call. */
2591 if (!modeline_time_displayed /* first time */
2592 || delta_time >= interval /* or if we were busy for a long time */
2593 || interval == 1 /* and every `interval' seconds hence */
2594 || interval == 60 && sec == 0 /* (usual cases first) */
2595 || (hour * 3600 + min * 60 + sec) % interval == 0)
2596 call2 (intern ("display-time-filter"), Qnil,
2597 build_string ("Wake up!\n"));
2598
2599 modeline_time_displayed = 1;
2600 }
2601 else if (modeline_time_displayed)
2602 {
2603 modeline_time_displayed = 0;
2604 Fset (intern ("display-time-string"), build_string (""));
2605
2606 /* Force immediate redisplay of modelines. */
2607 update_mode_lines++;
2608 redisplay_preserve_echo_area ();
2609 }
2610
2611 last_time = *t; 2575 last_time = *t;
2612} 2576}
2613 2577
@@ -2776,10 +2740,6 @@ syms_of_msdos ()
2776 staticpro (&recent_doskeys); 2740 staticpro (&recent_doskeys);
2777 2741
2778 defsubr (&Srecent_doskeys); 2742 defsubr (&Srecent_doskeys);
2779
2780 DEFVAR_LISP ("dos-display-time", &Vdos_display_time,
2781 "*When non-nil, `display-time' is in effect on DOS systems.");
2782 Vdos_display_time = Qnil;
2783} 2743}
2784 2744
2785#endif /* MSDOS */ 2745#endif /* MSDOS */