Bug: select() relocates grouping variables to the front

[mgirlich]

library(dbplyr)
library(dplyr, warn.conflicts = FALSE)

tbl_lazy(tibble(a = 1, b = 1)) %>% 
  group_by(b) %>% 
  select(a, b)
#> <SQL>
#> SELECT `b`, `a`
#> FROM `df`

# compare to dplyr
tibble(a = 1, b = 1) %>% 
  group_by(b) %>% 
  select(a, b)
#> # A tibble: 1 x 2
#> # Groups:   b [1]
#>       a     b
#>   <dbl> <dbl>
#> 1     1     1

^{Created on 2020-12-17 by the reprex package (v0.3.0)}