diff options
-rw-r--r-- | init.el | 32 |
1 files changed, 24 insertions, 8 deletions
diff --git a/init.el b/init.el index 1a85a20..c50b089 100644 --- a/init.el +++ b/init.el | |||
@@ -414,13 +414,24 @@ like a dumbass." | |||
414 | (save-some-buffers t)))) | 414 | (save-some-buffers t)))) |
415 | 415 | ||
416 | (setup flyspell | 416 | (setup flyspell |
417 | (setq-default ispell-program-name "hunspell" | 417 | ;; follow the directions here: https://old.reddit.com/r/emacs/comments/dgj0ae |
418 | ispell-dictionary "en_US" | 418 | ;; in short: |
419 | ispell-personal-dictionary "~/.hunspell_personal" | 419 | ;; - download hunspell from GitHub and put in ~/usr/bin |
420 | ispell-local-dictionary-alist '(("en_US" | 420 | ;; - download LibreOffice English dictionaries and put in |
421 | "[[:alpha:]]" "[^[:alpha:]]" | 421 | ;; ~/usr/share/hunspell |
422 | "[']" nil | 422 | (setq-default |
423 | ("-d" "en_US") nil utf-8))) | 423 | flyspell-issue-message-flag nil |
424 | ispell-program-name "hunspell" | ||
425 | ispell-dictionary "en_US" | ||
426 | ispell-personal-dictionary "~/.hunspell_personal" | ||
427 | ispell-local-dictionary-alist '(("en_US" | ||
428 | "[[:alpha:]]" "[^[:alpha:]]" | ||
429 | "[']" nil | ||
430 | ("-d" "en_US") nil utf-8))) | ||
431 | |||
432 | (acdw/system | ||
433 | (:work (setenv "DICPATH" (expand-file-name "~/usr/share/hunspell")))) | ||
434 | |||
424 | (when (boundp 'ispell-hunspell-dictionary-alist) | 435 | (when (boundp 'ispell-hunspell-dictionary-alist) |
425 | (setq-default | 436 | (setq-default |
426 | ispell-hunspell-dictionary-alist ispell-local-dictionary-alist)) | 437 | ispell-hunspell-dictionary-alist ispell-local-dictionary-alist)) |
@@ -435,7 +446,12 @@ like a dumbass." | |||
435 | 446 | ||
436 | (:when-loaded | 447 | (:when-loaded |
437 | (setup (:straight flyspell-correct) | 448 | (setup (:straight flyspell-correct) |
438 | (define-key flyspell-mode-map (kbd "C-;") #'flyspell-correct-wrapper)))) | 449 | (:with-map flyspell-mode-map |
450 | (:bind "C-;" flyspell-correct-wrapper | ||
451 | ;; Remove all other binds | ||
452 | "C-," nil | ||
453 | "C-." nil | ||
454 | "C-M-i" nil))))) | ||
439 | 455 | ||
440 | (setup frames | 456 | (setup frames |
441 | (:option frame-title-format '("%b@" | 457 | (:option frame-title-format '("%b@" |