diff options
| author | Case Duckworth | 2021-08-16 17:10:21 -0500 |
|---|---|---|
| committer | Case Duckworth | 2021-08-16 17:10:21 -0500 |
| commit | d5ecda3de5dc94dbbd5f17734c34f27742a70b19 (patch) | |
| tree | 6e6ef9d4ce837ab7129a0b536bac68b435ee27a4 | |
| parent | Move ‘org-mode@wc-stupid’ and try to make it smarterer (diff) | |
| download | emacs-d5ecda3de5dc94dbbd5f17734c34f27742a70b19.tar.gz emacs-d5ecda3de5dc94dbbd5f17734c34f27742a70b19.zip | |
Un-interactify ‘flyspell-start’
| -rw-r--r-- | init.el | 5 |
1 files changed, 1 insertions, 4 deletions
| diff --git a/init.el b/init.el index c416abe..d2f377e 100644 --- a/init.el +++ b/init.el | |||
| @@ -490,13 +490,10 @@ like a dumbass." | |||
| 490 | 490 | ||
| 491 | (defun flyspell-start () | 491 | (defun flyspell-start () |
| 492 | "Start `flyspell-mode' or `flyspell-prog-mode', depending on current mode." | 492 | "Start `flyspell-mode' or `flyspell-prog-mode', depending on current mode." |
| 493 | (interactive) | ||
| 494 | (cond ((derived-mode-p 'text-mode) | 493 | (cond ((derived-mode-p 'text-mode) |
| 495 | (flyspell-mode)) | 494 | (flyspell-mode)) |
| 496 | ((derived-mode-p 'prog-mode) | 495 | ((derived-mode-p 'prog-mode) |
| 497 | (flyspell-prog-mode)) | 496 | (flyspell-prog-mode)))) |
| 498 | ((called-interactively-p) | ||
| 499 | (message "Non-text or -prog mode. Run `flyspell-mode'.")))) | ||
| 500 | 497 | ||
| 501 | (when (executable-find ispell-program-name) | 498 | (when (executable-find ispell-program-name) |
| 502 | (add-hook 'change-major-mode-hook #'flyspell-start)) | 499 | (add-hook 'change-major-mode-hook #'flyspell-start)) |