*** no comment ***

1 files changed, 8 insertions, 8 deletions

diff --git a/chess-display.el b/chess-display.el
index 92f25c7..4fe35de 100644
--- a/chess-display.el
+++ b/chess-display.el
@@ -112,14 +112,6 @@
     (chess-display-update new-display t)
     new-display))
 
-(defun chess-display-destroy (display)
-  "Destroy a chess display object, killing all of its buffers."
-  (let ((buf (or display (current-buffer))))
-    (when (buffer-live-p buf)
-      (chess-display-event-handler (chess-display-game nil)
-				   buf 'destroy)
-      (kill-buffer buf))))
-
 (defsubst chess-display-style (display)
   (chess-with-current-buffer display
     chess-display-style))
@@ -328,6 +320,14 @@ that is supported by most displays, and is the default mode."
   (chess-with-current-buffer display
     (setq chess-display-no-popup t)))
 
+(defun chess-display-destroy (display)
+  "Destroy a chess display object, killing all of its buffers."
+  (let ((buf (or display (current-buffer))))
+    (when (buffer-live-p buf)
+      (chess-display-event-handler (chess-display-game nil)
+				   buf 'destroy)
+      (kill-buffer buf))))
+
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;
 ;; Event handler