Fix ui_cp_chart bug

[tonyfujs]

The log of the the pipapi in PROD shows the following line:
<simpleError in if (params$country == "ALL") { promises::future_promise({ do.call(pipapi::ui_cp_charts, params) }, seed = TRUE)} else { do.call(pipapi::ui_cp_charts, params)}: argument is of length zero>

This should not happen. I believe ui_cp_charts should never be called with country == ALL

[tonyfujs]

The problem seems to be that ui_cp_charts is being called with an empty country argument