diff options
author | Bram Moolenaar <Bram@vim.org> | 2011-07-27 14:15:46 +0200 |
---|---|---|
committer | Bram Moolenaar <Bram@vim.org> | 2011-07-27 14:15:46 +0200 |
commit | a171162356bd7f8b11f9af1061591316fc8dad3d (patch) | |
tree | 3ade295715bfc97cf79c8f909f52525cfd04aa79 /src/if_perl.xs | |
parent | d2221131cfe5e4c802b70a0d74ac23934c178a7c (diff) | |
download | vim-git-a171162356bd7f8b11f9af1061591316fc8dad3d.tar.gz |
updated for version 7.3.263v7.3.263
Problem: Perl and Tcl have a few code style problems.
Solution: Clean it up. (Elias Diem)
Diffstat (limited to 'src/if_perl.xs')
-rw-r--r-- | src/if_perl.xs | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/if_perl.xs b/src/if_perl.xs index 545dc7b66..f0afb3904 100644 --- a/src/if_perl.xs +++ b/src/if_perl.xs @@ -755,7 +755,7 @@ ex_perl(eap) #ifdef HAVE_SANDBOX if (sandbox) { - safe = perl_get_sv( "VIM::safe", FALSE ); + safe = perl_get_sv("VIM::safe", FALSE); # ifndef MAKE_TEST /* avoid a warning for unreachable code */ if (safe == NULL || !SvTRUE(safe)) EMSG(_("E299: Perl evaluation forbidden in sandbox without the Safe module")); @@ -1108,7 +1108,7 @@ Cursor(win, ...) VIWIN win PPCODE: - if(items == 1) + if (items == 1) { EXTEND(sp, 2); if (!win_valid(win)) @@ -1116,7 +1116,7 @@ Cursor(win, ...) PUSHs(sv_2mortal(newSViv(win->w_cursor.lnum))); PUSHs(sv_2mortal(newSViv(win->w_cursor.col))); } - else if(items == 3) + else if (items == 3) { int lnum, col; @@ -1249,9 +1249,9 @@ Delete(vimbuf, ...) { lnum = SvIV(ST(1)); count = 1 + SvIV(ST(2)) - lnum; - if(count == 0) + if (count == 0) count = 1; - if(count < 0) + if (count < 0) { lnum -= count; count = -count; |