diff lib/ur/basis.urs @ 1485:4300592e6803

Basis.currentUrlHasQueryString
author Adam Chlipala <adam@chlipala.net>
date Sun, 03 Jul 2011 16:21:04 -0400
parents d65387bdc557
children 3c0803c1acd7
line wrap: on
line diff
--- a/lib/ur/basis.urs	Sat Jul 02 20:49:58 2011 -0430
+++ b/lib/ur/basis.urs	Sun Jul 03 16:21:04 2011 -0400
@@ -655,6 +655,7 @@
 val checkUrl : string -> option url
 val currentUrl : transaction url
 val currentUrlHasPost : transaction bool
+val currentUrlHasQueryString : transaction bool
 val url : transaction page -> url
 val effectfulUrl : (option queryString -> transaction page) -> url
 val redirect : t ::: Type -> url -> transaction t