diff options
| -rw-r--r-- | ChangeLog | 5 | ||||
| -rw-r--r-- | doc/bgerror.n | 6 |
2 files changed, 7 insertions, 4 deletions
@@ -1,3 +1,8 @@ +2004-05-25 Donal K. Fellows <donal.k.fellows@man.ac.uk> + + * doc/bgerror.n: Use idiomatic open flags for working with log + files. [Bug 959602] + 2004-05-24 Jeff Hobbs <jeffh@ActiveState.com> * generic/tclExecute.c (VerifyExprObjType): use GET_WIDE_OR_INT to diff --git a/doc/bgerror.n b/doc/bgerror.n index e5aa246..29776f4 100644 --- a/doc/bgerror.n +++ b/doc/bgerror.n @@ -5,7 +5,7 @@ '\" See the file "license.terms" for information on usage and redistribution '\" of this file, and for a DISCLAIMER OF ALL WARRANTIES. '\" -'\" RCS: @(#) $Id: bgerror.n,v 1.5 2004/04/21 19:33:17 dkf Exp $ +'\" RCS: @(#) $Id: bgerror.n,v 1.6 2004/05/25 07:48:21 dkf Exp $ '\" .so man.macros .TH bgerror n 7.5 Tcl "Tcl Built-In Commands" @@ -77,14 +77,12 @@ package or other kind of library, consider avoiding \fBbgerror\fR. The reason for this is that the application programmer may also want to define a \fBbgerror\fR, or use other code that does and thus will have trouble integrating your code. - .SH "EXAMPLE" This \fBbgerror\fR procedure appends errors to a file, with a timestamp. - .CS proc bgerror {message} { set timestamp [clock format [clock seconds]] - set fl [open mylog.txt a] + set fl [open mylog.txt {WRONLY CREAT APPEND}] puts $fl "$timestamp: bgerror in $::argv '$message'" close $fl } |