Updated.

diff --git a/init b/init
index 6025b0c..afc67c4 100644 (file)
--- 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 (file)
--- 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 (executable)
--- 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";