[elpa] externals/guess-language 7e8c9e2 084/101: Function: guess language of current line.

[Stefan Monnier]

branch: externals/guess-language
commit 7e8c9e23a2cfac78705808991f717c28589ae429
Author: Titus von der Malsburg <address@hidden>
Commit: Titus von der Malsburg <address@hidden>

    Function: guess language of current line.
---
 guess-language.el | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/guess-language.el b/guess-language.el
index 7121486..1a95f4c 100644
--- a/guess-language.el
+++ b/guess-language.el
@@ -174,6 +174,12 @@ Region starts at BEGINNING and ends at END."
         (end       (save-excursion (forward-paragraph) (point))))
     (guess-language-region beginning end)))
 
+(defun guess-language-line ()
+  "Guess the language of the current buffer line."
+  (let ((beginning (save-excursion (beginning-of-line) (point)))
+        (end       (save-excursion (end-of-line) (point))))
+    (guess-language-region beginning end)))
+
 (defun guess-language ()
   "Guess language of the current paragraph.