diff options
| author | John Wiegley <johnw@newartisans.com> | 2002-04-10 21:08:12 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2002-04-10 21:08:12 +0000 |
| commit | d50c928242180a7f3e75d9d4deebca1a4dc8141c (patch) | |
| tree | fb01390359731d1397cb52f927161bcad9cf22b3 /chess-irc.el | |
| parent | fa6d9924972f0472c2f05d10d2909e20e8af7b4b (diff) | |
lots of work, several new event types, better support in chess-engine
for establishing the starting game position
Diffstat (limited to 'chess-irc.el')
| -rw-r--r-- | chess-irc.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/chess-irc.el b/chess-irc.el index dbc9cdf..a66f997 100644 --- a/chess-irc.el +++ b/chess-irc.el @@ -60,7 +60,7 @@ (when (and proc (eq (process-status proc) 'open)) (process-send-string proc (format "USER %s 0 * :%s\n" (user-login-name) - (user-full-name))) + chess-full-name)) (process-send-string proc (format "NICK %s\n" chess-irc-nick)) (set-process-filter proc 'chess-irc-filter) (set-process-buffer proc (current-buffer)) @@ -89,7 +89,7 @@ NOTE: This function is meant to be called from a display buffer!" (cdr (assq 'chess-engine-event-handler (chess-game-hooks (chess-display-game nil)))) (setq chess-irc-opponent nick) - (chess-engine-send nil (format "name %s\n" (user-full-name))))) + (chess-engine-send nil (format "chess match %s\n" chess-full-name)))) ;; This filter translates IRC syntax into basic chess-network protocol (defun chess-irc-filter (proc string) |
