updated for version 7.3.263
Problem: Perl and Tcl have a few code style problems.
Solution: Clean it up. (Elias Diem)
diff --git a/src/if_perl.xs b/src/if_perl.xs
index 545dc7b..f0afb39 100644
--- a/src/if_perl.xs
+++ b/src/if_perl.xs
@@ -755,7 +755,7 @@
#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 @@
VIWIN win
PPCODE:
- if(items == 1)
+ if (items == 1)
{
EXTEND(sp, 2);
if (!win_valid(win))
@@ -1116,7 +1116,7 @@
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 @@
{
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;