From 4a627a550cb54c18cb16cc0ad852e6a0bbc59c31 Mon Sep 17 00:00:00 2001 From: Adam Chlipala Date: Sun, 7 Sep 2008 12:58:33 -0400 Subject: Reading bools from SQL --- src/c/urweb.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/c/urweb.c') diff --git a/src/c/urweb.c b/src/c/urweb.c index 632dbf1e..ad625cf6 100644 --- a/src/c/urweb.c +++ b/src/c/urweb.c @@ -808,9 +808,9 @@ lw_Basis_float lw_Basis_stringToFloat_error(lw_context ctx, lw_Basis_string s) { } lw_Basis_bool lw_Basis_stringToBool_error(lw_context ctx, lw_Basis_string s) { - if (!strcasecmp (s, "True")) + if (!strcasecmp(s, "T") || !strcasecmp (s, "True")) return lw_Basis_True; - else if (!strcasecmp (s, "False")) + else if (!strcasecmp(s, "F") || !strcasecmp (s, "False")) return lw_Basis_False; else lw_error(ctx, FATAL, "Can't parse bool: %s", s); -- cgit v1.2.3