arrange() does not work before using collect()

[SulevR]

When trying to use dplyr arrange() function before collect(), it does not work.

Steps to reproduce:

cdm$condition_occurrence %>%
  arrange(condition_concept_id) %>%
  show_query()

ACTUAL RESULT:

  SELECT *
  FROM main.condition_occurrence

EXPECTED RESULT:

  SELECT *
  FROM main.condition_occurrence
  ORDER BY condition_concept_id