Mercurial > urweb

diff src/prepare.sml @ 491:0fd65c50e0e2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix demo regression
author Adam Chlipala <adamc@hcoop.net>
date Tue, 11 Nov 2008 16:51:45 -0500
parents 8e055bbbd28b
children 162d5308e34f
line wrap: on
line diff
--- a/src/prepare.sml	Tue Nov 11 16:27:51 2008 -0500
+++ b/src/prepare.sml	Tue Nov 11 16:51:45 2008 -0500
@@ -183,7 +183,7 @@
                 NONE =>
                 ((EQuery {exps = exps, tables = tables, rnum = rnum,
                           state = state, query = query, body = body,
-                          initial = initial, prepared = SOME (#2 sns)}, loc),
+                          initial = initial, prepared = NONE}, loc),
                  sns)
               | SOME (ss, n) =>
                 ((EQuery {exps = exps, tables = tables, rnum = rnum,