Mercurial > urweb
diff src/effectize.sml @ 1370:44a12a321150
queryString and effectfulUrl
author | Adam Chlipala <adam@chlipala.net> |
---|---|
date | Sun, 26 Dec 2010 17:29:03 -0500 |
parents | 7a436b6267ab |
children | 66092ce45a76 |
line wrap: on
line diff
--- a/src/effectize.sml Sun Dec 26 15:52:56 2010 -0500 +++ b/src/effectize.sml Sun Dec 26 17:29:03 2010 -0500 @@ -1,4 +1,4 @@ -(* Copyright (c) 2009, Adam Chlipala +(* Copyright (c) 2009-2010, Adam Chlipala * All rights reserved. * * Redistribution and use in source and binary forms, with or without @@ -141,7 +141,7 @@ in (d, loop (writers, readers, pushers)) end - | DExport (Link, n, _) => + | DExport (Link, n, t) => (case IM.find (writers, n) of NONE => () | SOME (loc, s) =>