diff options
author | ericm <ericm@noemail.net> | 2000-01-11 02:59:46 (GMT) |
---|---|---|
committer | ericm <ericm@noemail.net> | 2000-01-11 02:59:46 (GMT) |
commit | cb17010de50f0fb88d1369dcc228476c23e92163 (patch) | |
tree | 6c4583db4172b2f856c046a2512363d6f608c9d3 /generic/tclDate.c | |
parent | 4ffb56eded4194c3c7ecfbc750fccb9b1099d23c (diff) | |
download | tcl-cb17010de50f0fb88d1369dcc228476c23e92163.zip tcl-cb17010de50f0fb88d1369dcc228476c23e92163.tar.gz tcl-cb17010de50f0fb88d1369dcc228476c23e92163.tar.bz2 |
fixed "next" constant to give 1 unit ahead, not 2.
FossilOrigin-Name: 1438d1edd07d9cb71460f07975be12ab4041cde1
Diffstat (limited to 'generic/tclDate.c')
-rw-r--r-- | generic/tclDate.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclDate.c b/generic/tclDate.c index d3c7fb5..1cbb9b3 100644 --- a/generic/tclDate.c +++ b/generic/tclDate.c @@ -20,7 +20,7 @@ static char TclDatesccsid[] = "@(#)yaccpar 1.9 (Berkeley) 02/21/93"; * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclDate.c,v 1.9 2000/01/11 02:36:15 ericm Exp $ + * RCS: @(#) $Id: tclDate.c,v 1.10 2000/01/11 02:59:47 ericm Exp $ */ #include "tclInt.h" @@ -417,7 +417,7 @@ static TABLE OtherTable[] = { { "now", tMINUTE_UNIT, 0 }, { "last", tUNUMBER, -1 }, { "this", tMINUTE_UNIT, 0 }, - { "next", tUNUMBER, 2 }, + { "next", tUNUMBER, 1 }, #if 0 { "first", tUNUMBER, 1 }, { "second", tUNUMBER, 2 }, |