summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn Wiegley <johnw@newartisans.com>2002-04-16 00:35:06 +0000
committerJohn Wiegley <johnw@newartisans.com>2002-04-16 00:35:06 +0000
commit7979edbeb0343efb9d1c7ea2761ca1e994d5a8a0 (patch)
tree9ccadadb200503aa5e986c1c62a52d23d73ed40d
parent8b3169bbd5a6f6a11921b2206cffa75c62002927 (diff)
Removed `chess-with-current-buffer', since it is now in
chess-module.el.
-rw-r--r--chess-display.el7
-rw-r--r--chess-engine.el8
2 files changed, 1 insertions, 14 deletions
diff --git a/chess-display.el b/chess-display.el
index 8c0444d..a94a291 100644
--- a/chess-display.el
+++ b/chess-display.el
@@ -89,13 +89,6 @@ See `mode-line-format' for syntax details."
(make-variable-buffer-local 'chess-display-no-popup)
(make-variable-buffer-local 'chess-display-edit-mode)
-(defmacro chess-with-current-buffer (buffer &rest body)
- `(let ((buf ,buffer))
- (if buf
- (with-current-buffer buf
- ,@body)
- ,@body)))
-
(chess-message-catalog 'english
'((no-such-style . "There is no such chessboard display style '%s'")))
diff --git a/chess-engine.el b/chess-engine.el
index 1d268da..f745ced 100644
--- a/chess-engine.el
+++ b/chess-engine.el
@@ -6,6 +6,7 @@
;;; Commentary:
+(require 'chess-module)
(require 'chess-game)
(require 'chess-algebraic)
(require 'chess-fen)
@@ -70,13 +71,6 @@
(opp-illegal . "Your opponent states your last command was illegal")
(failed-start . "Failed to start chess engine process")))
-(defmacro chess-with-current-buffer (buffer &rest body)
- `(let ((buf ,buffer))
- (if buf
- (with-current-buffer buf
- ,@body)
- ,@body)))
-
(defsubst chess-engine-convert-algebraic (move &optional trust-check)
(or (chess-algebraic-to-ply (chess-engine-position nil) move trust-check)
(chess-engine-command nil 'illegal)))