branch: externals/guess-language
commit b0b14381e54c75aaba3446fa685db579efc6d7da
Author: Titus von der Malsburg <[email protected]>
Commit: Titus von der Malsburg <[email protected]>
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 ()