From 8d80074a37afea8da0d3f4bd5362942d1a588f8e Mon Sep 17 00:00:00 2001 From: rich Date: Mon, 14 Aug 2006 15:53:52 +0000 Subject: [PATCH] Whitespace change. --- scripts/page.ml | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/scripts/page.ml b/scripts/page.ml index adba28f..3592f8f 100644 --- a/scripts/page.ml +++ b/scripts/page.ml @@ -1,7 +1,7 @@ (* COCANWIKI - a wiki written in Objective CAML. * Written by Richard W.M. Jones . * Copyright (C) 2004 Merjis Ltd. - * $Id: page.ml,v 1.53 2006/08/14 11:36:50 rich Exp $ + * $Id: page.ml,v 1.54 2006/08/14 15:53:52 rich Exp $ * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by @@ -83,8 +83,7 @@ let run r (q : cgi) dbh hostid (* Host-specific fields. *) let rows = PGSQL(dbh) - "select feedback_email is not null, - mailing_list, navigation + "select feedback_email is not null, mailing_list, navigation from hosts where id = $hostid" in let has_feedback_email, mailing_list, navigation = match rows with -- 1.8.3.1