fst looses a variable class on write_fst and/or read_fst

gistfile1.txt

library(fst)
library(fs)

# name a list of files
# 
initial_list_of_files <- fs::dir_info("~") %>% select(path, size)
class(initial_list_of_files)
head(initial_list_of_files)

# now store that

temporary_file_name <- tempfile()
fst::write_fst(initial_list_of_files, temporary_file_name)

# Now read that back in again

readbackin <-fst::read_fst(temporary_file_name)

# cant merge

merge_old_and_new <-dplyr::left_join(initial_list_of_files, readbackin, by="path")

# here are the classes:
class(initial_list_of_files$path)
class(readbackin$path)

# lost the "fs_path" class on write_fst and/or read_fst. Only kept "character"

# Desired outcome: keep both paths from initial_input.
# 

at line 26 add:
class(readbackin$path) <- class(initial_list_of_files$path)
merge_old_and_new <-dplyr::left_join(initial_list_of_files, readbackin, by="path")

that works. Still a minor irritant in the otherwise marvelous fst package.