Mercurial > urweb

diff src/mono_opt.sml @ 1259:83b1853d1e58

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
URL-escape with '.' instead of '%', to avoid confusing proxies
author Adam Chlipala <adamc@hcoop.net>
date Tue, 18 May 2010 14:47:56 -0400
parents 51e596feec37
children 5137b0537c92
line wrap: on
line diff
--- a/src/mono_opt.sml	Sun May 16 18:25:00 2010 -0400
+++ b/src/mono_opt.sml	Tue May 18 14:47:56 2010 -0400
@@ -1,4 +1,4 @@
-(* Copyright (c) 2008, Adam Chlipala
+(* Copyright (c) 2008-2010, Adam Chlipala
  * All rights reserved.
  *
  * Redistribution and use in source and binary forms, with or without
@@ -86,7 +86,7 @@
                              | ch => if Char.isAlphaNum ch then
                                          str ch
                                      else
-                                         "%" ^ hexIt ch) s
+                                         "." ^ hexIt ch) s
 
 
 fun sqlifyInt n = #p_cast (Settings.currentDbms ()) (attrifyInt n, Settings.Int)