comparison src/msdos.c @ 14783:e7b489e4f25d

(check_timer): Remove code for dos-display-time. (syms_of_msdos): Delete dos-display-time Lisp var.

14782:8988aa71854e

#ifndef HAVE_SELECT
#include "sysselect.h"

static struct time last_time  = {120, 120, 120, 120};
static int modeline_time_displayed = 0;

Lisp_Object Vdos_display_time;

static void
check_timer (t)
     struct time *t;
{

  if (hour == last_time.ti_hour
      && min == last_time.ti_min
      && sec == last_time.ti_sec)
    return;

  if (!NILP (Vdos_display_time))
    {
      int interval;
      Lisp_Object dti = XSYMBOL (Fintern_soft (build_string ("display-time-interval"), Qnil))->value;
      int delta_time  = ((hour - last_time.ti_hour) * 3600
			 + (min  - last_time.ti_min) * 60
			 + (sec  - last_time.ti_sec));

      /* Who knows what the user may put into `display-time-interval'?  */
      if (!INTEGERP (dti) || (interval = XINT (dti)) <= 0)
	interval = 60;

      /* When it's time to renew the display, fake a `wakeup' call.  */
      if (!modeline_time_displayed	/* first time */
	  || delta_time >= interval	/* or if we were busy for a long time */
	  || interval == 1		/* and every `interval' seconds hence */
	  || interval == 60 && sec == 0	/* (usual cases first) */
	  || (hour * 3600 + min * 60 + sec) % interval == 0)
	call2 (intern ("display-time-filter"), Qnil,
	       build_string ("Wake up!\n"));

      modeline_time_displayed = 1;
    }
  else if (modeline_time_displayed)
    {
      modeline_time_displayed = 0;
      Fset (intern ("display-time-string"), build_string (""));

      /* Force immediate redisplay of modelines.  */
      update_mode_lines++;
      redisplay_preserve_echo_area ();
    }
  
  last_time  = *t;
}

#ifndef EMACS_TIME_ZERO_OR_NEG_P
#define EMACS_TIME_ZERO_OR_NEG_P(time)	\

{
  recent_doskeys = Fmake_vector (make_number (NUM_RECENT_DOSKEYS), Qnil);
  staticpro (&recent_doskeys);

  defsubr (&Srecent_doskeys);

  DEFVAR_LISP ("dos-display-time", &Vdos_display_time,
    "*When non-nil, `display-time' is in effect on DOS systems.");
  Vdos_display_time = Qnil;
}

#endif /* MSDOS */

14783:e7b489e4f25d

#ifndef HAVE_SELECT
#include "sysselect.h"

static struct time last_time  = {120, 120, 120, 120};

static void
check_timer (t)
     struct time *t;
{

  if (hour == last_time.ti_hour
      && min == last_time.ti_min
      && sec == last_time.ti_sec)
    return;

  last_time  = *t;
}

#ifndef EMACS_TIME_ZERO_OR_NEG_P
#define EMACS_TIME_ZERO_OR_NEG_P(time)	\

{
  recent_doskeys = Fmake_vector (make_number (NUM_RECENT_DOSKEYS), Qnil);
  staticpro (&recent_doskeys);

  defsubr (&Srecent_doskeys);
}

#endif /* MSDOS */