Treat )( and ]( as function call

[krlmlr]

+## R/each.r:71:45: style: Place a space before left parenthesis, except in a function call.
+##         for (i in 1:n) proto[[i]] <- fs[[i]](x, ...)
+##                                             ^
+## R/here.r:24:39: style: Place a space before left parenthesis, except in a function call.
+##   call <- substitute(function(...) (f)(...), list(f = f))
+##                                       ^

[jimhester]

Both of these cases no longer produce lints in the devel version.