[cvslog] (2003-01-18 00:40:15 UTC) Module eggdrop1.6: Change committed

cvslog cvs at tsss.org
Fri Jan 17 18:41:01 CST 2003


CVSROOT    : /usr/local/cvsroot
Module     : eggdrop1.6
Commit time: 2003-01-18 00:40:15 UTC
Commited by: Will Buckner <wcc at techmonkeys.org>

Modified files:
     doc/UPDATES1.6 src/patch.h src/tclmisc.c

Log message:

[unixtime] was not increased when eggdrop was blocked during a series of
in-line Tcl commands (due to 'now' not being increased when blocked).

Example (before):
  .tcl set foo1 [unixtime];after 1000; set foo2 [unixtime]; after
  1000; set foo3 [unixtime];list $foo1 $foo2 $foo3
  
  Tcl: 1042850776 1042850776 1042850776

Example (after):
  .tcl set foo1 [unixtime];after 1000; set foo2 [unixtime]; after
  1000; set foo3 [unixtime];list $foo1 $foo2 $foo3

  Tcl: 1042850429 1042850430 1042850431

Found by never.

---------------------- diff included ----------------------
Index: eggdrop1.6/doc/UPDATES1.6
diff -u eggdrop1.6/doc/UPDATES1.6:1.442 eggdrop1.6/doc/UPDATES1.6:1.443
--- eggdrop1.6/doc/UPDATES1.6:1.442	Tue Jan 14 19:42:21 2003
+++ eggdrop1.6/doc/UPDATES1.6	Fri Jan 17 18:40:05 2003
@@ -1,10 +1,12 @@
-$Id: UPDATES1.6,v 1.442 2003/01/15 01:42:21 wcc Exp $
+$Id: UPDATES1.6,v 1.443 2003/01/18 00:40:05 wcc Exp $
 
 Changes in Eggdrop: (since v1.6.0)
 ----------------------------------
 
 1.6.14
 Found by  Fixed by  What...
+never     Wcc       unixtime was not increased when eggdrop was blocked during
+                    a series of in-line Tcl commands
 lee       Wcc       exported getchanmode()
 various   darko``   removed strict-servernames -- $server is now always the
                     server's realname and $serveraddress is it's server list
Index: eggdrop1.6/src/patch.h
diff -u eggdrop1.6/src/patch.h:1.870 eggdrop1.6/src/patch.h:1.871
--- eggdrop1.6/src/patch.h:1.870	Tue Jan 14 19:42:21 2003
+++ eggdrop1.6/src/patch.h	Fri Jan 17 18:40:05 2003
@@ -10,7 +10,7 @@
  * statement, leave the rest of the file alone, this allows better
  * overlapping patches.
  *
- * $Id: patch.h,v 1.870 2003/01/15 01:42:21 wcc Exp $
+ * $Id: patch.h,v 1.871 2003/01/18 00:40:05 wcc Exp $
  */
 /*
  * Copyright (C) 1997 Robey Pointer
@@ -41,12 +41,12 @@
  *
  *
  */
-patch("1042594871");		/* current unixtime */
+patch("1042848171");		/* current unixtime */
 /*
  *
  *
  */
-patch("export_getchanmode");
+patch("unixtime_incr");
 /*
  *
  *
Index: eggdrop1.6/src/tclmisc.c
diff -u eggdrop1.6/src/tclmisc.c:1.33 eggdrop1.6/src/tclmisc.c:1.34
--- eggdrop1.6/src/tclmisc.c:1.33	Wed Dec 25 20:21:53 2002
+++ eggdrop1.6/src/tclmisc.c	Fri Jan 17 18:40:05 2003
@@ -2,7 +2,7 @@
  * tclmisc.c -- handles:
  *   Tcl stubs for everything else
  *
- * $Id: tclmisc.c,v 1.33 2002/12/26 02:21:53 wcc Exp $
+ * $Id: tclmisc.c,v 1.34 2003/01/18 00:40:05 wcc Exp $
  */
 /*
  * Copyright (C) 1997 Robey Pointer
@@ -24,6 +24,7 @@
  */
 
 #include <sys/stat.h>
+#include <time.h>
 #include "main.h"
 #include "modules.h"
 #include "tandem.h"
@@ -344,9 +345,10 @@
 static int tcl_unixtime STDVAR
 {
   char s[11];
+  time_t now2 = time(NULL);
 
   BADARGS(1, 1, "");
-  egg_snprintf(s, sizeof s, "%lu", (unsigned long) now);
+  egg_snprintf(s, sizeof s, "%lu", (unsigned long) now2);
   Tcl_AppendResult(irp, s, NULL);
   return TCL_OK;
 }
----------------------- End of diff -----------------------



More information about the Changes mailing list