(* Has someone else edited this page in the meantime? *)
let sth = dbh#prepare_cached "select max(id) from pages
where hostid = ? and url = ?" in
(* Has someone else edited this page in the meantime? *)
let sth = dbh#prepare_cached "select max(id) from pages
where hostid = ? and url = ?" in