diff options
| -rw-r--r-- | lisp/vt100-led.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/vt100-led.el b/lisp/vt100-led.el index 541f06ef471..8310aa39117 100644 --- a/lisp/vt100-led.el +++ b/lisp/vt100-led.el | |||
| @@ -29,7 +29,7 @@ | |||
| 29 | ;;; Code: | 29 | ;;; Code: |
| 30 | 30 | ||
| 31 | (defvar led-state (make-vector 5 nil) | 31 | (defvar led-state (make-vector 5 nil) |
| 32 | "The internal state of the LEDs. Choices are nil, t, `flash. | 32 | "The internal state of the LEDs. Choices are nil, t, 'flash. |
| 33 | Element 0 is not used.") | 33 | Element 0 is not used.") |
| 34 | 34 | ||
| 35 | (defun led-flash (l) | 35 | (defun led-flash (l) |
| @@ -46,7 +46,7 @@ Element 0 is not used.") | |||
| 46 | (led-update)) | 46 | (led-update)) |
| 47 | 47 | ||
| 48 | (defun led-on (l) | 48 | (defun led-on (l) |
| 49 | "Turn on LED l." | 49 | "Turn on LED L." |
| 50 | (aset led-state l t) | 50 | (aset led-state l t) |
| 51 | (led-update)) | 51 | (led-update)) |
| 52 | 52 | ||