[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 1514869: Fix Enchant dictionary finding routine

From: Reuben Thomas
Subject: master 1514869: Fix Enchant dictionary finding routine
Date: Mon, 7 Sep 2020 16:05:03 -0400 (EDT)

branch: master
commit 151486931c82f6af38a912631c9cd41b677aae47
Author: Reuben Thomas <rrt@sc3d.org>
Commit: Reuben Thomas <rrt@sc3d.org>

    Fix Enchant dictionary finding routine
    * lisp/textmodes/ispell.el (ispell-find-enchant-dictionaries): Don’t
      pass `buffer-string' to enchant-lsmod. Remove zero-length substrings
      from the split output of `enchant-lsmod`, as the output ends with a
      separator. Pass the current language to
      `ispell--get-extra-word-characters', so we get the result for the
      current language, not the default language. (Patch from Jorge P. de
      Morais Neto.)
 lisp/textmodes/ispell.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index 11f90f4..a99dfe4 100644
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -1236,11 +1236,11 @@ If LANG is omitted, get the extra word characters for 
the default language."
   "Find Enchant's dictionaries, and record in 
   (let* ((dictionaries
-          (ispell--call-enchant-lsmod "-list-dicts" (buffer-string)) " 
+          (ispell--call-enchant-lsmod "-list-dicts") " ([^)]+)\n" t))
           (mapcar #'(lambda (lang)
                       `(,lang "[[:alpha:]]" "[^[:alpha:]]"
-                              ,(ispell--get-extra-word-characters) t nil nil 
+                              ,(ispell--get-extra-word-characters lang) t nil 
nil utf-8))
     ;; Merge into FOUND any elements from the standard 
     ;; which have no element in FOUND at all.

reply via email to

[Prev in Thread] Current Thread [Next in Thread]