gg_season displays range for year time plot

[linusjf]

#!/usr/bin/env Rscript
suppressMessages(library(dplyr))
suppressMessages(library(tsibble))
suppressMessages(library(tsibbledata))
suppressMessages(library(ggplot2))
suppressMessages(library(feasts))
vic_elec |> gg_season(Demand, period = "year") +
  labs(y="MWh", title="Electricity demand: Victoria")

The above code produces the following graph:

Year legend labels are displayed as a range and include "hh:mm:ss". How do I display only the 4 digit year instead?

feasts version: 0.3.1