[nongnu] elpa/flx 5c23a9e87d 180/182: Merge pull request #114 from tarsiiformes/silencio

[ELPA Syncer]

branch: elpa/flx
commit 5c23a9e87d6938f5bb5dcb93a42e95ad1723f1c3
Merge: e3b3f0533e c342eb02a9
Author: Le Wang <lewang@users.noreply.github.com>
Commit: GitHub <noreply@github.com>

    Merge pull request #114 from tarsiiformes/silencio
    
    No longer bind obsolete max-specpdl-size
---
 flx.el | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/flx.el b/flx.el
index eb2522928c..452207f20d 100644
--- a/flx.el
+++ b/flx.el
@@ -159,7 +159,7 @@ See documentation for logic."
                       (if (zerop group-word-count) nil last-char)))
                  (when (flx-boundary-p effective-last-char char)
                    (setcdr (cdar groups-alist)
-                          (cons index (cl-cddar groups-alist))))
+                           (cons index (cl-cddar groups-alist))))
                  (when (and (not (flx-word-p last-char))
                             (flx-word-p char))
                    (cl-incf group-word-count)))
@@ -362,7 +362,6 @@ For other parameters, see `flx-score'"
 
          ;; Raise recursion limit
          (max-lisp-eval-depth 5000)
-         (max-specpdl-size 10000)
 
          ;; Dynamic Programming table for memoizing flx-find-best-match
          (match-cache (make-hash-table :test 'eql :size 10))
@@ -403,11 +402,11 @@ SCORE of nil means to clear the properties."
         (when (and last-char
                    (not (= (1+ last-char) char)))
           (put-text-property block-started  (1+ last-char)
-                            'face 'flx-highlight-face str)
+                             'face 'flx-highlight-face str)
           (setq block-started char))
         (setq last-char char))
       (put-text-property block-started  (1+ last-char)
-                        'face 'flx-highlight-face str)
+                         'face 'flx-highlight-face str)
       (when add-score
         (setq str (format "%s [%s]" str (car score)))))
     (if (consp obj)
@@ -431,4 +430,7 @@ SCORE of nil means to clear the properties."
 
 (provide 'flx)
 
+;; Local Variables:
+;; indent-tabs-mode: nil
+;; End:
 ;;; flx.el ends here