diff options
| author | donal.k.fellows@manchester.ac.uk <dkf> | 2004-10-06 13:09:43 (GMT) |
|---|---|---|
| committer | donal.k.fellows@manchester.ac.uk <dkf> | 2004-10-06 13:09:43 (GMT) |
| commit | 0a7a79d4008b9acf087368de9d83564b03431022 (patch) | |
| tree | 173a61f8c1cd74d959797fd913e0264149e7bc9d /generic/tclFCmd.c | |
| parent | 7711d5a8a59501be602aef427bb60f6838cfda2b (diff) | |
| download | tcl-0a7a79d4008b9acf087368de9d83564b03431022.zip tcl-0a7a79d4008b9acf087368de9d83564b03431022.tar.gz tcl-0a7a79d4008b9acf087368de9d83564b03431022.tar.bz2 | |
Add braces round if body...
Diffstat (limited to 'generic/tclFCmd.c')
| -rw-r--r-- | generic/tclFCmd.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/generic/tclFCmd.c b/generic/tclFCmd.c index 1c16ef0..3d0bb95 100644 --- a/generic/tclFCmd.c +++ b/generic/tclFCmd.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: tclFCmd.c,v 1.26 2004/04/06 22:25:51 dgp Exp $ + * RCS: @(#) $Id: tclFCmd.c,v 1.27 2004/10/06 13:09:43 dkf Exp $ */ #include "tclInt.h" @@ -609,7 +609,9 @@ CopyRenameOneFile(interp, source, target, copyFlag, force) */ if (Tcl_FSGetPathType(path) == TCL_PATH_RELATIVE) { Tcl_Obj *abs = Tcl_FSJoinToPath(actualSource, 1, &path); - if (abs == NULL) break; + if (abs == NULL) { + break; + } Tcl_IncrRefCount(abs); Tcl_DecrRefCount(path); path = abs; |