thac0/vim
1
0
Fork 0
forked from aniani/vim
Code Activity

updated for version 7.3.263

Browse Source 
Problem:    Perl and Tcl have a few code style problems.
Solution:   Clean it up.  (Elias Diem)
This commit is contained in:
Bram Moolenaar
2011-07-27 14:15:46 +02:00
parent d2221131cf
commit a171162356
3 changed files with 10 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/if_tcl.c
View File

@@ -1884,14 +1884,14 @@ tclexit(error)
{
int newerr = OK;
if (error == TCL_EXIT )
if (error == TCL_EXIT)
{
int retval;
char buf[50];
Tcl_Obj *robj;
robj = Tcl_GetObjResult(tclinfo.interp);
if( Tcl_GetIntFromObj(tclinfo.interp, robj, &retval) != TCL_OK )
if (Tcl_GetIntFromObj(tclinfo.interp, robj, &retval) != TCL_OK)
{
EMSG(_("E281: TCL ERROR: exit code is not int!? Please report this to vim-dev@vim.org"));
newerr = FAIL;
@@ -1900,7 +1900,7 @@ tclexit(error)
{
sprintf(buf, _("E572: exit code %d"), retval);
tclerrmsg(buf);
if (retval == 0 )
if (retval == 0)
{
did_emsg = 0;
newerr = OK;