SCM *velts = SCM_VELTS (stime);
int have_zone = 0;
- if (SCM_NFALSEP (velts[10]) && *SCM_STRING_CHARS (velts[10]) != 0)
+ if (!SCM_FALSEP (velts[10]) && *SCM_STRING_CHARS (velts[10]) != 0)
{
/* it's not required that the TZ setting be correct, just that
it has the right name. so try something like TZ=EST0.
#endif
}
- result = scm_makfromstr (tbuf+1, len-1, 0);
+ result = scm_mem2string (tbuf + 1, len - 1);
scm_must_free (tbuf);
scm_must_free(myfmt);
return result;