diff options
| author | John Wiegley <johnw@newartisans.com> | 2002-04-12 09:07:01 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2002-04-12 09:07:01 +0000 |
| commit | de037adf033425192efefb66f098037766c6932e (patch) | |
| tree | e8414ef3ac94a986ed93e9497da2f7354662f4e7 /chess-irc.el | |
| parent | e66b028def9af45cc545c973255df42c9b90cde1 (diff) | |
*** no comment ***
Diffstat (limited to 'chess-irc.el')
| -rw-r--r-- | chess-irc.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/chess-irc.el b/chess-irc.el index 1588b22..9cb39bb 100644 --- a/chess-irc.el +++ b/chess-irc.el @@ -10,13 +10,13 @@ "Use an IRC bot for sending/receiving moves." :group 'chess-engine) -(defcustom chess-irc-host "irc.openprojects.net" +(defcustom chess-irc-server "irc.openprojects.net" "The IRC host to connect your chess-irc engine to." :type 'string :group 'chess-irc) (defcustom chess-irc-port 6667 - "The port of the IRC host specified by `chess-irc-host'." + "The port of the IRC host specified by `chess-irc-server'." :type 'string :group 'chess-irc) @@ -50,12 +50,12 @@ (cond ((eq event 'initialize) (message "Connecting to IRC server '%s:%d'..." - chess-irc-host chess-irc-port) + chess-irc-server chess-irc-port) (let ((engine (current-buffer)) proc) (with-current-buffer (generate-new-buffer " *chess-irc*") (setq chess-irc-engine engine proc (open-network-stream "*chess-irc*" (current-buffer) - chess-irc-host chess-irc-port)) + chess-irc-server chess-irc-port)) (message "Connected, now logging in as '%s'..." chess-irc-nick) (when (and proc (eq (process-status proc) 'open)) (process-send-string proc (format "USER %s 0 * :%s\n" |