diff options
| author | jenglish <jenglish@flightlab.com> | 2004-01-31 20:27:52 (GMT) |
|---|---|---|
| committer | jenglish <jenglish@flightlab.com> | 2004-01-31 20:27:52 (GMT) |
| commit | 5a4965f1fbe6901da747bcb0653fb0280088417f (patch) | |
| tree | f24ecb59524780df3aff8fc9906c4a7c7905d4df /unix/tkUnixEvent.c | |
| parent | b943941ae6c6a3b3fbfdae1ee6faeaa1c2935dc6 (diff) | |
| download | tk-5a4965f1fbe6901da747bcb0653fb0280088417f.zip tk-5a4965f1fbe6901da747bcb0653fb0280088417f.tar.gz tk-5a4965f1fbe6901da747bcb0653fb0280088417f.tar.bz2 | |
Replaced TclpGetTime() with Tcl_GetTime(), to remove
dependency on tclInt.h [Bug 874745].
Diffstat (limited to 'unix/tkUnixEvent.c')
| -rw-r--r-- | unix/tkUnixEvent.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/unix/tkUnixEvent.c b/unix/tkUnixEvent.c index b76130e..0a42ccb 100644 --- a/unix/tkUnixEvent.c +++ b/unix/tkUnixEvent.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkUnixEvent.c,v 1.14 2004/01/13 02:06:01 davygrvy Exp $ + * RCS: @(#) $Id: tkUnixEvent.c,v 1.15 2004/01/31 20:27:52 jenglish Exp $ */ #include "tkInt.h" @@ -470,7 +470,7 @@ TkUnixDoOneXEvent(timePtr) */ if (timePtr) { - TclpGetTime(&now); + Tcl_GetTime(&now); blockTime.tv_sec = timePtr->sec; blockTime.tv_usec = timePtr->usec - now.usec; if (blockTime.tv_usec < 0) { @@ -543,7 +543,7 @@ TkUnixDoOneXEvent(timePtr) */ if (timePtr) { - TclpGetTime(&now); + Tcl_GetTime(&now); if ((now.sec > timePtr->sec) || ((now.sec == timePtr->sec) && (now.usec > timePtr->usec))) { return 0; |