Replaced print-str with pr-str, to keep data in the correct format if it is redefined elsewhere.