showSave :: TSave -> String
showSave c = "Save: " ++ (svvar c) ++ " -> " ++ (svfile c)
showSave :: TSave -> String
showSave c = "Save: " ++ (svvar c) ++ " -> " ++ (svfile c)
showSave c = "Save: " ++ (svvar c) ++ " -> " ++ (svfile c)