diff options
| author | Mario Lang <mlang@delysid.org> | 2004-02-06 11:36:00 +0000 |
|---|---|---|
| committer | Mario Lang <mlang@delysid.org> | 2004-02-06 11:36:00 +0000 |
| commit | 05e67fce1e756d2c0d4a07dcd541919287d15419 (patch) | |
| tree | 59eb8ea7524489dabf152165ed5fdd03166c363d | |
| parent | 2cde330cbbc0f0d9a78e1b7d7f977508e9931cda (diff) | |
docstring
| -rw-r--r-- | chess-file.el | 1 | ||||
| -rw-r--r-- | chess-plain.el | 8 |
2 files changed, 5 insertions, 4 deletions
diff --git a/chess-file.el b/chess-file.el index dc385da..30565af 100644 --- a/chess-file.el +++ b/chess-file.el @@ -28,6 +28,7 @@ object from/into the buffer and SEPARATOR is a list of characters to insert inbetween of individual records.") (defun chess-file-handler (event &rest args) + "Event handler for file database objects." (cond ((eq event 'open) (with-current-buffer (find-file-noselect (car args)) diff --git a/chess-plain.el b/chess-plain.el index 94e3a53..e67fb78 100644 --- a/chess-plain.el +++ b/chess-plain.el @@ -17,7 +17,7 @@ :type 'boolean) (defcustom chess-plain-border-chars '(?+ ?- ?+ ?| ?| ?+ ?- ?+) - "*Characters used to draw borders." + "*A list of Characters used to draw borders." :group 'chess-plain :type '(list (character :tag "Upper left corner") (character :tag "Upper border") @@ -29,12 +29,12 @@ (character :tag "Lower right corner"))) (defcustom chess-plain-black-square-char ?. - "*Character used to indicate black squares." + "*Character used to indicate empty black squares." :group 'chess-plain :type 'character) (defcustom chess-plain-white-square-char ?. - "*Character used to indicate white squares." + "*Character used to indicate empty white squares." :group 'chess-plain :type 'character) @@ -67,7 +67,7 @@ modify `chess-plain-piece-chars' to avoid real confusion.)" :type '(choice (const color) (const square-color))) (defcustom chess-plain-spacing 1 - "*Number of spaces between pieces." + "*Number of spaces between files." :group 'chess-plain :type 'integer) |