diff options
| -rw-r--r-- | chess-log.el | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/chess-log.el b/chess-log.el new file mode 100644 index 0000000..383da10 --- /dev/null +++ b/chess-log.el @@ -0,0 +1,20 @@ +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;; +;; Log chess events, as an aid to debugging +;; + +;;; Commentary: + +(require 'chess-module) + +(defgroup chess-log nil + "Code for logging chess events." + :group 'chess) + +(defun chess-log (&rest args) + (with-current-buffer (get-buffer-create "*Chess Log*") + (insert (apply 'format args) ?\n))) + +(provide 'chess-log) + +;;; chess-log.el ends here |