From c9dc56852854f8e4618ec6830484ef45faafc1a5 Mon Sep 17 00:00:00 2001
From: John Wiegley <johnw@newartisans.com>
Date: Tue, 16 Apr 2002 19:48:33 +0000
Subject: Removed the $ Revision strings; they are no longer necessary since I
 tag every revision that I upload.

---
 chess-algebraic.el |  3 +--
 chess-announce.el  |  1 -
 chess-autosave.el  |  1 -
 chess-clock.el     |  1 -
 chess-common.el    |  1 -
 chess-crafty.el    |  1 -
 chess-database.el  |  1 -
 chess-display.el   | 13 ++++++-------
 chess-engine.el    |  4 ++--
 chess-fen.el       |  1 -
 chess-file.el      |  1 -
 chess-game.el      |  1 -
 chess-gnuchess.el  |  1 -
 chess-ics.el       |  1 -
 chess-ics1.el      |  1 -
 chess-images.el    |  1 -
 chess-irc.el       |  1 -
 chess-link.el      |  1 -
 chess-message.el   |  1 -
 chess-module.el    |  1 -
 chess-network.el   |  1 -
 chess-none.el      |  1 -
 chess-pgn.el       |  1 -
 chess-phalanx.el   |  1 -
 chess-plain.el     |  1 -
 chess-ply.el       |  1 -
 chess-pos.el       |  1 -
 chess-random.el    |  1 -
 chess-scid.el      |  1 -
 chess-sound.el     |  1 -
 chess-transport.el |  1 -
 chess-var.el       |  1 -
 32 files changed, 9 insertions(+), 40 deletions(-)

diff --git a/chess-algebraic.el b/chess-algebraic.el
index 62ccf0f..b84bf7d 100644
--- a/chess-algebraic.el
+++ b/chess-algebraic.el
@@ -30,8 +30,7 @@
 ;; buffer:
 ;;
 ;;    chess-algebraic-regexp
-
-;; $Revision$
+;;
 
 (require 'chess-ply)
 
diff --git a/chess-announce.el b/chess-announce.el
index bad8a56..98bf2e2 100644
--- a/chess-announce.el
+++ b/chess-announce.el
@@ -2,7 +2,6 @@
 ;;
 ;; Scheme to verbally announce moves
 ;;
-;; $Revision$
 
 (require 'chess-game)
 
diff --git a/chess-autosave.el b/chess-autosave.el
index afcadba..7b01fd7 100644
--- a/chess-autosave.el
+++ b/chess-autosave.el
@@ -2,7 +2,6 @@
 ;;
 ;; A special kind of display that merely autosaves the game
 ;;
-;; $Revision$
 
 (require 'chess-game)
 
diff --git a/chess-clock.el b/chess-clock.el
index 3ded9a9..c2f0e7c 100644
--- a/chess-clock.el
+++ b/chess-clock.el
@@ -2,7 +2,6 @@
 ;;
 ;; Implements a chess clock
 ;;
-;; $Revision$
 
 (defvar chess-clock-last-time nil)
 (defvar chess-clock-timer nil)
diff --git a/chess-common.el b/chess-common.el
index c25c1c9..347bbd6 100644
--- a/chess-common.el
+++ b/chess-common.el
@@ -5,7 +5,6 @@
 ;;
 ;;   http://www.tim-mann.org/xboard/engine-intf.html
 ;;
-;; $Revision$
 
 (require 'chess-engine)
 
diff --git a/chess-crafty.el b/chess-crafty.el
index 204effe..22f67ca 100644
--- a/chess-crafty.el
+++ b/chess-crafty.el
@@ -2,7 +2,6 @@
 ;;
 ;; Play against crafty!
 ;;
-;; $Revision$
 
 (require 'chess-engine)
 (require 'chess-common)
diff --git a/chess-database.el b/chess-database.el
index 68c318a..b3a7818 100644
--- a/chess-database.el
+++ b/chess-database.el
@@ -2,7 +2,6 @@
 ;;
 ;; Basic code for manipulating game databases
 ;;
-;; $Revision$
 
 (defvar chess-database-handler nil)
 
diff --git a/chess-display.el b/chess-display.el
index eea0370..67596f8 100644
--- a/chess-display.el
+++ b/chess-display.el
@@ -209,13 +209,6 @@ also view the same game."
 	     (chess-module-leader-p nil))
 	(chess-display-popup nil))))
 
-(defun chess-display-redraw (&optional display)
-  "Just redraw the current display."
-  (interactive)
-  (chess-with-current-buffer display
-    (erase-buffer)
-    (chess-display-update nil)))
-
 (defun chess-display-move (display ply)
   "Move a piece on DISPLAY, by applying the given PLY.
 The position of PLY must match the currently displayed position.
@@ -420,6 +413,12 @@ The key bindings available in this mode are:
 ;; Commands used by the keyboard bindings above
 ;;
 
+(defun chess-display-redraw ()
+  "Just redraw the current display."
+  (interactive)
+  (erase-buffer)
+  (chess-display-update nil))
+
 (defsubst chess-display-active-p ()
   "Return non-nil if the displayed chessboard reflects an active game.
 Basically, it means we are playing, not editing or reviewing."
diff --git a/chess-engine.el b/chess-engine.el
index f745ced..ebce110 100644
--- a/chess-engine.el
+++ b/chess-engine.el
@@ -2,7 +2,6 @@
 ;;
 ;; Obtain movements and other information from an engine
 ;;
-;; $Revision$
 
 ;;; Commentary:
 
@@ -265,7 +264,8 @@
 	    (unless (memq (process-status proc) '(run open))
 	      (chess-error 'failed-engine-start))
 	    (setq chess-engine-process proc)
-	    (set-process-filter proc 'chess-engine-filter))
+	    (unless (process-filter proc)
+	      (set-process-filter proc 'chess-engine-filter)))
 	  (setq chess-engine-current-marker (point-marker))
 	  (current-buffer))))))
 
diff --git a/chess-fen.el b/chess-fen.el
index bd540a3..cacb1f8 100644
--- a/chess-fen.el
+++ b/chess-fen.el
@@ -37,7 +37,6 @@
 ;; It may also have the current game sequence appended, but this
 ;; relate to the game, not the position.
 ;;
-;; $Revision$
 
 (require 'chess-pos)
 
diff --git a/chess-file.el b/chess-file.el
index ddfeac7..e22ede3 100644
--- a/chess-file.el
+++ b/chess-file.el
@@ -4,7 +4,6 @@
 ;;
 ;; This is basically what you expect from a file ending in .pgn.
 ;;
-;; $Revision$
 
 (defvar chess-file-locations)
 
diff --git a/chess-game.el b/chess-game.el
index 0bdc76a..0e27fbd 100644
--- a/chess-game.el
+++ b/chess-game.el
@@ -2,7 +2,6 @@
 ;;
 ;; Maintain a chess game that is being played or viewed
 ;;
-;; $Revision$
 
 ;;; Commentary:
 
diff --git a/chess-gnuchess.el b/chess-gnuchess.el
index 32c4030..9e54642 100644
--- a/chess-gnuchess.el
+++ b/chess-gnuchess.el
@@ -2,7 +2,6 @@
 ;;
 ;; Play against gnuchess!
 ;;
-;; $Revision$
 
 (require 'chess-engine)
 (require 'chess-common)
diff --git a/chess-ics.el b/chess-ics.el
index 4b8ee43..6a43229 100644
--- a/chess-ics.el
+++ b/chess-ics.el
@@ -2,7 +2,6 @@
 ;;
 ;; An engine for interacting with Internet Chess Servers
 ;;
-;; $Revision$
 
 (require 'comint)
 (require 'chess-network)
diff --git a/chess-ics1.el b/chess-ics1.el
index f21c63e..e372f30 100644
--- a/chess-ics1.el
+++ b/chess-ics1.el
@@ -2,7 +2,6 @@
 ;;
 ;; ICS1 style display
 ;;
-;; $Revision$
 
 (require 'chess-display)
 
diff --git a/chess-images.el b/chess-images.el
index a68fe59..3eb094e 100644
--- a/chess-images.el
+++ b/chess-images.el
@@ -2,7 +2,6 @@
 ;;
 ;; Chessboard display style using graphical images
 ;;
-;; $Revision$
 
 ;;; Commentary:
 
diff --git a/chess-irc.el b/chess-irc.el
index b8dfa9e..a7f5abb 100644
--- a/chess-irc.el
+++ b/chess-irc.el
@@ -2,7 +2,6 @@
 ;;
 ;; This transport uses an IRC bot to send/receive moves.
 ;;
-;; $Revision$
 
 (require 'chess-network)
 
diff --git a/chess-link.el b/chess-link.el
index 11cdd63..091e13e 100644
--- a/chess-link.el
+++ b/chess-link.el
@@ -5,7 +5,6 @@
 ;; (like chess-gnuchess), this will allow you to expose a bot over the
 ;; channel.
 ;;
-;; $Revision$
 
 (require 'chess)
 (require 'chess-engine)
diff --git a/chess-message.el b/chess-message.el
index 79786ff..9723283 100644
--- a/chess-message.el
+++ b/chess-message.el
@@ -2,7 +2,6 @@
 ;;
 ;; Code shared by all chess displays
 ;;
-;; $Revision$
 
 (defgroup chess-message nil
   "Support for message catalogs in chess.el."
diff --git a/chess-module.el b/chess-module.el
index e91d0df..9494af9 100644
--- a/chess-module.el
+++ b/chess-module.el
@@ -2,7 +2,6 @@
 ;;
 ;; Basic module support code underlying all chess.el modules
 ;;
-;; $Revision$
 
 (require 'chess-game)
 
diff --git a/chess-network.el b/chess-network.el
index 0d7a6af..05df3dc 100644
--- a/chess-network.el
+++ b/chess-network.el
@@ -2,7 +2,6 @@
 ;;
 ;; Play against an opponent over the network
 ;;
-;; $Revision$
 
 (require 'chess-engine)
 (require 'chess-fen)
diff --git a/chess-none.el b/chess-none.el
index e5004ef..3b9a69b 100644
--- a/chess-none.el
+++ b/chess-none.el
@@ -2,7 +2,6 @@
 ;;
 ;; A null engine, used when two humans play each on the same display.
 ;;
-;; $Revision$
 
 (require 'chess-engine)
 
diff --git a/chess-pgn.el b/chess-pgn.el
index 162d640..65558aa 100644
--- a/chess-pgn.el
+++ b/chess-pgn.el
@@ -2,7 +2,6 @@
 ;;
 ;; Convert a chess game to/from PGN notation
 ;;
-;; $Revision$
 
 (require 'chess-game)
 (require 'chess-pos)
diff --git a/chess-phalanx.el b/chess-phalanx.el
index 846946e..08d851f 100644
--- a/chess-phalanx.el
+++ b/chess-phalanx.el
@@ -2,7 +2,6 @@
 ;;
 ;; Play against phalanx!
 ;;
-;; $Revision$
 
 (require 'chess-engine)
 (require 'chess-common)
diff --git a/chess-plain.el b/chess-plain.el
index ff44a60..2f386e9 100644
--- a/chess-plain.el
+++ b/chess-plain.el
@@ -2,7 +2,6 @@
 ;;
 ;; Plain ASCII chess display
 ;;
-;; $Revision$
 
 (require 'chess-display)
 
diff --git a/chess-ply.el b/chess-ply.el
index 829510c..e5eb626 100644
--- a/chess-ply.el
+++ b/chess-ply.el
@@ -2,7 +2,6 @@
 ;;
 ;; Routines for manipulating chess plies
 ;;
-;; $Revision$
 
 ;;; Commentary:
 
diff --git a/chess-pos.el b/chess-pos.el
index 3585e06..200fc97 100644
--- a/chess-pos.el
+++ b/chess-pos.el
@@ -2,7 +2,6 @@
 ;;
 ;; Routines for manipulating chess positions
 ;;
-;; $Revision$
 
 ;;; Commentary:
 
diff --git a/chess-random.el b/chess-random.el
index 210ba31..c6cbe1c 100644
--- a/chess-random.el
+++ b/chess-random.el
@@ -5,7 +5,6 @@
 ;; Just call `chess-fischer-random-position' to generate such a
 ;; position.
 ;;
-;; $Revision$
 
 (require 'chess-pos)
 
diff --git a/chess-scid.el b/chess-scid.el
index 2bdb8e5..bf16b03 100644
--- a/chess-scid.el
+++ b/chess-scid.el
@@ -5,7 +5,6 @@
 ;; The advantage is that it's much faster than PGN, and far, far more
 ;; compact.
 ;;
-;; $Revision$
 
 (defvar chess-scid-process)
 
diff --git a/chess-sound.el b/chess-sound.el
index 08b2f7f..9713ec8 100644
--- a/chess-sound.el
+++ b/chess-sound.el
@@ -3,7 +3,6 @@
 ;; This is very similar to chess-announce, except it uses specific
 ;; .WAV files instead of text-to-speech.
 ;;
-;; $Revision$
 
 (require 'chess-game)
 
diff --git a/chess-transport.el b/chess-transport.el
index f88432e..9911a3f 100644
--- a/chess-transport.el
+++ b/chess-transport.el
@@ -5,7 +5,6 @@
 ;; receive.  This could be used for transmitting chess.el protocol
 ;; over CTCP, for example.
 ;;
-;; $Revision$
 
 (require 'chess-network)
 
diff --git a/chess-var.el b/chess-var.el
index 55be268..95586cb 100644
--- a/chess-var.el
+++ b/chess-var.el
@@ -2,7 +2,6 @@
 ;;
 ;; Manipulate variations (which are really just lists of plies)
 ;;
-;; $Revision$
 
 ;;; Commentary:
 
-- 
cgit v1.2.3