# HG changeset patch
# User Ziv Scully <ziv@mit.edu>
# Date 1438565844 25200
# Node ID 565da55a4e18589cd6a4a33eed45d25e2407d2ef
# Parent  4769b27aa43669b41d7e9e268b55659314dfadd4
Fix NONE capitalization typo.

diff -r 4769b27aa436 -r 565da55a4e18 src/sql.sml
--- a/src/sql.sml	Sun Aug 02 18:26:44 2015 -0700
+++ b/src/sql.sml	Sun Aug 02 18:37:24 2015 -0700
@@ -309,7 +309,7 @@
    expressions, so accept any expression without modifying it. *)
 val sqlifySqlcache =
  fn Exp e :: chs => SOME (e, chs)
-  | _ => None
+  | _ => NONE
 
 fun constK s = wrap (const s) (fn () => s)