comparison demo/crud.ur @ 1265:e8d68fd8ed4b

Consider view declarations while shaking
author Adam Chlipala <adamc@hcoop.net>
date Thu, 27 May 2010 15:10:52 -0400
parents ad15700272f6
children d008c4c43a0a
comparison
equal deleted inserted replaced
1264:79b2bcac6200 1265:e8d68fd8ed4b
165 return <xml><body> 165 return <xml><body>
166 <p>Are you sure you want to delete ID #{[id]}?</p> 166 <p>Are you sure you want to delete ID #{[id]}?</p>
167 167
168 <form><submit action={delete} value="I was born sure!"/></form> 168 <form><submit action={delete} value="I was born sure!"/></form>
169 </body></xml> 169 </body></xml>
170 end 170 end
171 171
172 and main () = 172 and main () =
173 ls <- list (); 173 ls <- list ();
174 return <xml><head> 174 return <xml><head>
175 <title>{cdata M.title}</title> 175 <title>{cdata M.title}</title>