diff options
| author | Po Lu | 2025-02-19 10:13:00 +0800 |
|---|---|---|
| committer | Po Lu | 2025-02-19 10:18:10 +0800 |
| commit | d05894f82d90c6d739aa3d424651fda2c86f68ec (patch) | |
| tree | c72ff299e99fb0c2b0d444cebeaec56026a2b885 | |
| parent | 450966223679d51d78cd8bbdba70bda684dd3a36 (diff) | |
| download | emacs-d05894f82d90c6d739aa3d424651fda2c86f68ec.tar.gz emacs-d05894f82d90c6d739aa3d424651fda2c86f68ec.zip | |
Don't insist on the presence of a mouse in strokes-mode
* lisp/strokes.el (strokes-mode): Don't test `display-mouse-p',
as the presence of a mouse may vary over the course of an Emacs
session.
| -rw-r--r-- | lisp/strokes.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/strokes.el b/lisp/strokes.el index cfec2d382ea..4020538c942 100644 --- a/lisp/strokes.el +++ b/lisp/strokes.el | |||
| @@ -1382,9 +1382,7 @@ Encode/decode your strokes with \\[strokes-encode-buffer], | |||
| 1382 | 1382 | ||
| 1383 | \\{strokes-mode-map}" | 1383 | \\{strokes-mode-map}" |
| 1384 | :lighter strokes-lighter :global t | 1384 | :lighter strokes-lighter :global t |
| 1385 | (cond ((not (display-mouse-p)) | 1385 | (cond (strokes-mode ; turn on strokes |
| 1386 | (error "Can't use Strokes without a mouse")) | ||
| 1387 | (strokes-mode ; turn on strokes | ||
| 1388 | (and (file-exists-p strokes-file) | 1386 | (and (file-exists-p strokes-file) |
| 1389 | (null strokes-global-map) | 1387 | (null strokes-global-map) |
| 1390 | (strokes-load-user-strokes)) | 1388 | (strokes-load-user-strokes)) |