summaryrefslogtreecommitdiff
path: root/chess-irc.el
diff options
context:
space:
mode:
authorCraig Jennings <c@cjennings.net>2025-10-19 18:49:00 -0500
committerCraig Jennings <c@cjennings.net>2025-10-19 18:49:00 -0500
commite1d60d2110987f1060c0b37d032621c669d97d5e (patch)
tree2ff171a86f28593da724bb754d80278e74cf8f5d /chess-irc.el
parent865b2ab11469f3bd1bc4d7b3669cb4626c37be08 (diff)
fix: all: fixes to get emacs-chess working on 30.2
- added lexical-binding headers to all source files - replaced make-variable-buffer-local with defvar-local throughout source code - replaced deprecated cl library with cl-lib, including replacing assert with cl-assert to emacs-chess-steps.el - added proper headers and footers to test files when missing - populated chess images and chess sounds directory - fixed defcustom calling directory-files without error handling. xboard installation no longer required.
Diffstat (limited to 'chess-irc.el')
-rw-r--r--chess-irc.el21
1 files changed, 7 insertions, 14 deletions
diff --git a/chess-irc.el b/chess-irc.el
index d29e3d3..996e45a 100644
--- a/chess-irc.el
+++ b/chess-irc.el
@@ -1,4 +1,4 @@
-;;; chess-irc.el --- This transport uses an IRC bot to send/receive moves.
+;;; chess-irc.el --- This transport uses an IRC bot to send/receive moves. -*- lexical-binding: t; -*-
;; Copyright (C) 2014 Free Software Foundation, Inc.
@@ -57,19 +57,12 @@
(chess-message 'opponent-says
(match-string 0))))))))
-(defvar chess-irc-process)
-(defvar chess-irc-engine)
-(defvar chess-irc-opponent)
-(defvar chess-irc-working nil)
-(defvar chess-irc-last-pos nil)
-(defvar chess-irc-use-ctcp nil)
-
-(make-variable-buffer-local 'chess-irc-process)
-(make-variable-buffer-local 'chess-irc-engine)
-(make-variable-buffer-local 'chess-irc-opponent)
-(make-variable-buffer-local 'chess-irc-working)
-(make-variable-buffer-local 'chess-irc-last-pos)
-(make-variable-buffer-local 'chess-irc-use-ctcp)
+(defvar-local chess-irc-process nil)
+(defvar-local chess-irc-engine nil)
+(defvar-local chess-irc-opponent nil)
+(defvar-local chess-irc-working nil)
+(defvar-local chess-irc-last-pos nil)
+(defvar-local chess-irc-use-ctcp nil)
(defun chess-irc-handler (game event &rest args)
"This is an example of a generic transport engine."