pickle_unpickle root_element filepath = do
-- We need to check only the root message element since
-- readDocument produces a bunch of other junk.
pickle_unpickle root_element filepath = do
-- We need to check only the root message element since
-- readDocument produces a bunch of other junk.