($ (require json)) (if ((w/instring json "{\"success\":false}" ($.read-json json)) 'success) 'success ; proceed to login 'fail ; must be a robot then )