io::E_FILE_ARCHIVE_TYPE
scm_to_file_archive_type (SCM file_archive_type)
{
- char* type = scm_to_utf8_stringn (scm_symbol_to_string (file_archive_type), NULL);
+ char* type = scm_to_utf8_string (scm_symbol_to_string (file_archive_type));
if (!strcmp (type, "zip"))
{
return io::EFAT_ZIP;