1772 (add-hook 'log-edit-mode-hook 'flyspell-mode) |
1772 (add-hook 'log-edit-mode-hook 'flyspell-mode) |
1773 |
1773 |
1774 ;; (setq-default ispell-extra-args '("--sug-mode=ultra")) |
1774 ;; (setq-default ispell-extra-args '("--sug-mode=ultra")) |
1775 |
1775 |
1776 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1776 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1777 (message "dict, dictd, dictionary, gadict, gaphrase") |
1777 (message "dict, dictd, dictionary, gadict, gaphrase, gadialog") |
1778 |
1778 |
1779 (when (fboundp 'gadict-mode) |
1779 (when (fboundp 'gadict-mode) |
1780 (add-to-list 'auto-mode-alist '("\\.gadict$" . gadict-mode)) ) |
1780 (add-to-list 'auto-mode-alist '("\\.gadict$" . gadict-mode)) ) |
1781 (add-hook 'gadict-mode-hook 'whitespace-mode) |
1781 (add-hook 'gadict-mode-hook 'whitespace-mode) |
1782 |
1782 |
1783 (when (fboundp 'gaphrase-mode) |
1783 (when (fboundp 'gaphrase-mode) |
1784 (add-to-list 'auto-mode-alist '("\\.gaphrase$" . gaphrase-mode)) ) |
1784 (add-to-list 'auto-mode-alist '("\\.gaphrase$" . gaphrase-mode)) ) |
1785 (add-hook 'gaphrase-mode-hook 'whitespace-mode) |
1785 (add-hook 'gaphrase-mode-hook 'whitespace-mode) |
|
1786 |
|
1787 (when (fboundp 'gadialog-mode) |
|
1788 (add-to-list 'auto-mode-alist '("\\.gadialog$" . gadialog-mode)) ) |
|
1789 (add-hook 'gadialog-mode-hook 'whitespace-mode) |
1786 |
1790 |
1787 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1791 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1788 (message "figlet") |
1792 (message "figlet") |
1789 |
1793 |
1790 (defun my-figlet-region (&optional b e) |
1794 (defun my-figlet-region (&optional b e) |