From 7979edbeb0343efb9d1c7ea2761ca1e994d5a8a0 Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Tue, 16 Apr 2002 00:35:06 +0000 Subject: Removed `chess-with-current-buffer', since it is now in chess-module.el. --- chess-display.el | 7 ------- chess-engine.el | 8 +------- 2 files changed, 1 insertion(+), 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))) -- cgit v1.2.3