[cvslog] (2005-07-31 02:18:46 UTC) Module eggdrop1.6: Change committed!

cvslog cvs at tsss.org
Sat Jul 30 20:18:46 CST 2005


CVSROOT    : /usr/local/cvsroot
Module     : eggdrop1.6
Commit time: 2005-07-31 02:18:46 UTC
Commited by: Will Buckner <wcc at techmonkeys.org>

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

Log message:

- Apparently we broke lastbind.
* Found by: bUrN - Patch by: thommey

---------------------- diff included ----------------------
Index: eggdrop1.6/doc/UPDATES1.6
diff -u eggdrop1.6/doc/UPDATES1.6:1.611 eggdrop1.6/doc/UPDATES1.6:1.612
--- eggdrop1.6/doc/UPDATES1.6:1.611	Sat Jul 23 17:13:14 2005
+++ eggdrop1.6/doc/UPDATES1.6	Sat Jul 30 21:18:35 2005
@@ -1,4 +1,4 @@
-$Id: UPDATES1.6,v 1.611 2005/07/23 22:13:14 wcc Exp $
+$Id: UPDATES1.6,v 1.612 2005/07/31 02:18:35 wcc Exp $
 
 Eggdrop Changes (since v1.6.0)
     _____________________________________________________________________
@@ -12,6 +12,9 @@
 
 
   1.6.18:
+    - Apparently we broke lastbind.
+    * Found by: bUrN - Patch by: thommey
+
     - Request topic on channel reset.
     * Found by: De Kus - Patch by: Darko
 
Index: eggdrop1.6/src/patch.h
diff -u eggdrop1.6/src/patch.h:1.1154 eggdrop1.6/src/patch.h:1.1155
--- eggdrop1.6/src/patch.h:1.1154	Sat Jul 23 17:13:14 2005
+++ eggdrop1.6/src/patch.h	Sat Jul 30 21:18:35 2005
@@ -10,7 +10,7 @@
  * statement, leave the rest of the file alone, this allows better
  * overlapping patches.
  *
- * $Id: patch.h,v 1.1154 2005/07/23 22:13:14 wcc Exp $
+ * $Id: patch.h,v 1.1155 2005/07/31 02:18:35 wcc Exp $
  */
 /*
  * Copyright (C) 1997 Robey Pointer
@@ -41,12 +41,12 @@
  *
  *
  */
-patch("1122156581");            /* current unixtime */
+patch("1122776494");            /* current unixtime */
 /*
  *
  *
  */
-patch("resetchan-topic");
+patch("lastbind-fix");
 /*
  *
  *
Index: eggdrop1.6/src/tclhash.c
diff -u eggdrop1.6/src/tclhash.c:1.54 eggdrop1.6/src/tclhash.c:1.55
--- eggdrop1.6/src/tclhash.c:1.54	Mon Feb  7 19:08:19 2005
+++ eggdrop1.6/src/tclhash.c	Sat Jul 30 21:18:36 2005
@@ -7,7 +7,7 @@
  *   (non-Tcl) procedure lookups for msg/dcc/file commands
  *   (Tcl) binding internal procedures to msg/dcc/file commands
  *
- * $Id: tclhash.c,v 1.54 2005/02/08 01:08:19 tothwolf Exp $
+ * $Id: tclhash.c,v 1.55 2005/07/31 02:18:36 wcc Exp $
  */
 /*
  * Copyright (C) 1997 Robey Pointer
@@ -684,10 +684,10 @@
   ContextNote(buf);
   nfree(buf);
 #endif /* DEBUG_CONTEXT */
+  Tcl_SetVar(interp, "lastbind", (char *) mask, TCL_GLOBAL_ONLY);
   x = Tcl_VarEval(interp, proc, param, NULL);
   Context;
 
-  Tcl_SetVar(interp, "lastbind", (char *) mask, TCL_GLOBAL_ONLY);
 
   if (x == TCL_ERROR) {
     /* FIXME: we really should be able to log longer errors */
@@ -812,6 +812,7 @@
            */
 
           tc->hits++;
+          Tcl_SetVar(interp, "lastbind", (char *) tm->mask, TCL_GLOBAL_ONLY);
           x = trigger_bind(tc->func_name, param, tm->mask);
 
           if (match_type & BIND_ALTER_ARGS) {
----------------------- End of diff -----------------------



More information about the Changes mailing list