[elpa] externals/guess-language 84dda4b 012/101: Check whether regexps have to be recompiled.

[Stefan Monnier]

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

    Check whether regexps have to be recompiled.
    
    When the list of languages has been changed.
---
 guess-language.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/guess-language.el b/guess-language.el
index 3a040da..68dcafc 100644
--- a/guess-language.el
+++ b/guess-language.el
@@ -62,6 +62,8 @@ languages are:
 (with-eval-after-load "guess-language" (guess-language-compile-regexps))
 
 (defun guess-language (beginning end)
+  (when (cl-set-exclusive-or guess-language-languages (mapcar #'car 
guess-language-regexps))
+    (guess-language-compile-regexps))
   (let ((tally (cl-loop
                 for lang in guess-language-regexps
                 for regexp = (cdr lang)