branch: externals/guess-language
commit da675df406c2b971b2ad4c8d56ef15ee9920faf1
Author: Titus von der Malsburg <[email protected]>
Commit: Titus von der Malsburg <[email protected]>
Fix locating of data files.
---
guess-language.el | 7 +++----
1 file changed, 3 insertions(+), 4 deletions(-)
diff --git a/guess-language.el b/guess-language.el
index b17ffa9..3b1fca4 100644
--- a/guess-language.el
+++ b/guess-language.el
@@ -105,10 +105,9 @@ little material to reliably guess the language."
"Load language statistics."
(cl-loop
for lang in guess-language-languages
- for fname = (expand-file-name (symbol-name lang)
- (expand-file-name "trigrams"
- (file-name-directory
- (or load-file-name
buffer-file-name))))
+ for fname = (expand-file-name
+ (symbol-name lang)
+ (file-name-directory (cdr (find-function-library
'guess-language-mode))))
for trigrams = (with-temp-buffer
(insert-file-contents fname)
(split-string (buffer-string) "\n" t))
