branch: externals/guess-language commit b0b14381e54c75aaba3446fa685db579efc6d7da Author: Titus von der Malsburg <malsb...@posteo.de> Commit: Titus von der Malsburg <malsb...@posteo.de>
Made some functions non-interactive. --- guess-language.el | 3 --- 1 file changed, 3 deletions(-) diff --git a/guess-language.el b/guess-language.el index 38e7a28..f4f364a 100644 --- a/guess-language.el +++ b/guess-language.el @@ -93,17 +93,14 @@ little material to reliably guess the language." (car (cl-reduce (lambda (x y) (if (> (cdr x) (cdr y)) x y)) tally)))) (defun guess-language-buffer () - (interactive) (guess-language (point-min) (point-max))) (defun guess-language-paragraph () - (interactive) (let ((beginning (save-excursion (backward-paragraph) (point))) (end (save-excursion (forward-paragraph) (point)))) (guess-language beginning end))) (defun guess-language-region () - (interactive) (guess-language (region-beginning) (region-end))) (defun guess-language-autoset ()