From 5e6674263be334ebb33bfda3412b5c3682968d85 Mon Sep 17 00:00:00 2001
From: rjones <rjones>
Date: Fri, 29 Jun 2007 07:55:47 +0000
Subject: [PATCH] Updated.

---
 init              | 2 +-
 ocamlbotwrapper.c | 2 +-
 xavierbot.pl      | 6 +++---
 3 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/init b/init
index 6025b0c..afc67c4 100644
--- a/init
+++ b/init
@@ -1,5 +1,5 @@
 (* Initialise the toplevel environment.
- * $Id: init,v 1.3 2007/06/28 23:18:28 rjones Exp $
+ * $Id: init,v 1.4 2007/06/29 07:55:47 rjones Exp $
  * - Removes the Pervasives module and any dangerous functions.
  * - Loads just the modules we want to give access to, and just
  *   the functions within those modules that we want to give.
diff --git a/ocamlbotwrapper.c b/ocamlbotwrapper.c
index 16178c3..c852850 100644
--- a/ocamlbotwrapper.c
+++ b/ocamlbotwrapper.c
@@ -1,5 +1,5 @@
 /* -*- C -*-
- * $Id: ocamlbotwrapper.c,v 1.3 2007/06/28 23:18:28 rjones Exp $
+ * $Id: ocamlbotwrapper.c,v 1.4 2007/06/29 07:55:47 rjones Exp $
  * SUID wrapper around ocaml program.
  */
 
diff --git a/xavierbot.pl b/xavierbot.pl
index 8485438..bfdd9bf 100755
--- a/xavierbot.pl
+++ b/xavierbot.pl
@@ -2,7 +2,7 @@
 # xavierbot : an OCaml interpreter IRC bot.
 # By Richard W.M. Jones <rich@annexia.org>.
 # This code is in the Public Domain.
-# $Id: xavierbot.pl,v 1.6 2007/06/29 07:40:15 rjones Exp $
+# $Id: xavierbot.pl,v 1.7 2007/06/29 07:55:47 rjones Exp $
 
 use strict;
 use POE qw(Component::IRC Wheel::Run);
@@ -12,8 +12,8 @@ use POE qw(Component::IRC Wheel::Run);
 
 my $nick = "xavierbot";
 my $ircname = "Xavierbot";		# Printable name.
-#my $server = "chat.freenode.net";
-my $server = "devserv.devel.redhat.com";
+my $server = "chat.freenode.net";
+#my $server = "devserv.devel.redhat.com";
 my $port = 6667;
 my $channel = "#ocaml";
 
-- 
1.8.3.1