diff options
| author | Kevin B Kenny <kennykb@acm.org> | 2007-04-20 06:10:56 (GMT) |
|---|---|---|
| committer | Kevin B Kenny <kennykb@acm.org> | 2007-04-20 06:10:56 (GMT) |
| commit | 2e1d6b21db75a43a44e02272dce97955e9aecde1 (patch) | |
| tree | 103cdcd515ae38406063be74a3bb942be25c9ebd /generic/tclPkg.c | |
| parent | 19d1741894fc2c56ad61073c9004a90afabf2e56 (diff) | |
| download | tcl-2e1d6b21db75a43a44e02272dce97955e9aecde1.zip tcl-2e1d6b21db75a43a44e02272dce97955e9aecde1.tar.gz tcl-2e1d6b21db75a43a44e02272dce97955e9aecde1.tar.bz2 | |
Replaced commas in varargs with string concatenation where possible [Patch 1515234]
Diffstat (limited to 'generic/tclPkg.c')
| -rw-r--r-- | generic/tclPkg.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclPkg.c b/generic/tclPkg.c index 5426bc7..dff6090 100644 --- a/generic/tclPkg.c +++ b/generic/tclPkg.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclPkg.c,v 1.26 2006/12/05 15:36:12 dgp Exp $ + * RCS: @(#) $Id: tclPkg.c,v 1.27 2007/04/20 06:10:58 kennykb Exp $ * * TIP #268. * Heavily rewritten to handle the extend version numbers, and extended @@ -286,7 +286,7 @@ Tcl_PkgRequireEx( tclEmptyStringRep = &tclEmptyString; Tcl_AppendResult(interp, "Cannot load package \"", name, - "\" in standalone executable: This package is not ", + "\" in standalone executable: This package is not " "compiled with stub support", NULL); return NULL; } @@ -380,7 +380,7 @@ Tcl_PkgRequireProc( */ if (pkgPtr->clientData != NULL) { - Tcl_AppendResult(interp, "circular package dependency: ", + Tcl_AppendResult(interp, "circular package dependency: " "attempt to provide ", name, " ", (char *) pkgPtr->clientData, " requires ", name, NULL); AddRequirementsToResult(interp, reqc, reqv); @@ -532,7 +532,7 @@ Tcl_PkgRequireProc( Tcl_Obj *codePtr = Tcl_NewIntObj(code); Tcl_ResetResult(interp); Tcl_AppendResult(interp, "attempt to provide package ", - name, " ", versionToProvide, " failed: ", + name, " ", versionToProvide, " failed: " "bad return code: ", TclGetString(codePtr), NULL); TclDecrRefCount(codePtr); code = TCL_ERROR; |