Mercurial > urweb
diff src/cjr_print.sml @ 1537:e627bab3eda7
Fix list urlification
author | Adam Chlipala <adam@chlipala.net> |
---|---|
date | Sun, 14 Aug 2011 16:46:36 -0400 |
parents | a71223513c77 |
children | dc4c61363d0a |
line wrap: on
line diff
--- a/src/cjr_print.sml Sun Aug 14 09:31:53 2011 -0400 +++ b/src/cjr_print.sml Sun Aug 14 16:46:36 2011 -0400 @@ -832,7 +832,7 @@ space, string "+=", space, - string "3, (*request == '/' ? *request++ = 0 : 0), NULL) : ((!strncmp(*request, \"Cons\", 4) && ((*request)[4] == 0 ", + string "3, ((*request)[0] == '/' ? *request++ = 0 : 0), NULL) : ((!strncmp(*request, \"Cons\", 4) && ((*request)[4] == 0 ", string "|| (*request)[4] == '/')) ? (*request", space, string "+=",