===================================================================
RCS file: /cvsrepo/anoncvs/cvs/src/usr.bin/systat/main.c,v
retrieving revision 1.38
retrieving revision 1.39
diff -c -r1.38 -r1.39
*** src/usr.bin/systat/main.c	2008/06/12 22:26:01	1.38
--- src/usr.bin/systat/main.c	2008/06/13 01:24:55	1.39
***************
*** 1,4 ****
! /* $Id: main.c,v 1.38 2008/06/12 22:26:01 canacar Exp $	 */
  /*
   * Copyright (c) 2001, 2007 Can Erkin Acar
   * Copyright (c) 2001 Daniel Hartmeier
--- 1,4 ----
! /* $Id: main.c,v 1.39 2008/06/13 01:24:55 canacar Exp $	 */
  /*
   * Copyright (c) 2001, 2007 Can Erkin Acar
   * Copyright (c) 2001 Daniel Hartmeier
***************
*** 311,320 ****
  {
  	double del;
  	del = atof(cmdbuf);
! 	error("delay: %g", del);
  	if (del > 0) {
  		udelay = (useconds_t)(del * 1000000);
  		gotsig_alarm = 1;
  	}
  }
  
--- 311,321 ----
  {
  	double del;
  	del = atof(cmdbuf);
! 
  	if (del > 0) {
  		udelay = (useconds_t)(del * 1000000);
  		gotsig_alarm = 1;
+ 		naptime = del;
  	}
  }
  
***************
*** 440,446 ****
  			break;
  		case 's':
  			delay = atof(optarg);
! 			if (delay < 0)
  				delay = 5;
  			break;
  		case 'S':
--- 441,447 ----
  			break;
  		case 's':
  			delay = atof(optarg);
! 			if (delay <= 0)
  				delay = 5;
  			break;
  		case 'S':
***************
*** 480,485 ****
--- 481,488 ----
  	udelay = (useconds_t)(delay * 1000000.0);
  	if (udelay < 1)
  		udelay = 1;
+ 
+ 	naptime = (double)udelay / 1000000.0;
  
  	gethostname(hostname, sizeof (hostname));
  	gethz();