fixed Languagetool, added visible bell

This commit is contained in:
2026-03-26 22:17:09 +01:00
parent 72e3ae5e5f
commit b9bfb74633

19
init.el
View File

@@ -44,6 +44,7 @@
(add-hook 'emacs-lisp-mode-hook 'turn-on-paredit) (add-hook 'emacs-lisp-mode-hook 'turn-on-paredit)
(use-package emacs-everywhere :ensure t :defer t :hook after-init) (use-package emacs-everywhere :ensure t :defer t :hook after-init)
;; --- from better-defaults --- ;; --- from better-defaults ---
@@ -271,7 +272,7 @@
;; make emacs remember last session ;; make emacs remember last session
(setq save-place-file (concat user-emacs-directory ".saveplace")) (setq save-place-file (concat user-emacs-directory ".saveplace"))
;; (setq desktop-dirname (concat user-emacs-directory ".desktop.d")) (setq desktop-dirname (concat user-emacs-directory ".desktop.d"))
;; (setq-default save-place t) ;; (setq-default save-place t)
;; (require 'saveplace) ;; (require 'saveplace)
(save-place-mode 1) (save-place-mode 1)
@@ -321,14 +322,16 @@
languagetool-server-mode languagetool-server-mode
languagetool-server-start languagetool-server-start
languagetool-server-stop) languagetool-server-stop)
:config (setq languagetool-java-arguments (list "-Dfile.encoding=UTF-8" (concat "--languagemodel " (concat user-emacs-directory ".languagetool/ngram-data"))) :config (setq languagetool-java-arguments '("-Dfile.encoding=UTF-8")
languagetool-console-command (concat user-emacs-directory (concat ".languagetool/languagetool-commandline.jar")) languagetool-console-command (concat user-emacs-directory ".languagetool/languagetool-commandline.jar")
languagetool-console-arguments (list (concat user-emacs-directory "--languagemodel") " .languagetool/ngram-data") languagetool-console-arguments (list "--languagemodel" (concat user-emacs-directory ".languagetool/ngram-data"))
languagetool-server-command (concat user-emacs-directory (concat ".languagetool/languagetool-server.jar")) languagetool-server-command (concat user-emacs-directory ".languagetool/languagetool-server.jar")
languagetool-server-arguments (list (concat user-emacs-directory "--languageModel") " .languagetool/ngram-data") languagetool-server-arguments (list "--languageModel" (concat user-emacs-directory ".languagetool/ngram-data"))
) )
) )
;; TODO make languagetool languagte toggle function ;; TODO make languagetool languagte toggle function
;; defun my/languagetool-toggle-language ;; defun my/languagetool-toggle-language
;; switch between auto, en, de ;; switch between auto, en, de
@@ -347,6 +350,10 @@
;; '(markdown-mode . ("harper-ls" "--stdio")) ;; '(markdown-mode . ("harper-ls" "--stdio"))
;; )) ;; ))
;; make screen flash instead of annoying bell
(setq visible-bell t)
;; flycheck told me to do this: ;; flycheck told me to do this:
(provide 'init) (provide 'init)
;;; init.el ends here ;;; init.el ends here