[elpa] master 78c52fd 005/177: fix: shoosh warning with LETREC instead of LET

[João Távora]

branch: master
commit 78c52fdf5cc049b8e40c8d693058017de8a53b6f
Author: João Távora <address@hidden>
Commit: João Távora <address@hidden>

    fix: shoosh warning with LETREC instead of LET
---
 yasnippet.el |   20 ++++++++++----------
 1 files changed, 10 insertions(+), 10 deletions(-)

diff --git a/yasnippet.el b/yasnippet.el
index a6754ab..6ee8a19 100644
--- a/yasnippet.el
+++ b/yasnippet.el
@@ -696,16 +696,16 @@ defined direct keybindings to the command
 (defun yas--modes-to-activate ()
   "Compute list of mode symbols that are active for `yas-expand'
 and friends."
-  (let ((dfs (lambda (mode &optional explored)
-               (push mode explored)
-               (cons mode
-                     (loop for neighbour
-                           in (remove nil (cons (get mode
-                                                     'derived-mode-parent)
-                                                (gethash mode yas--parents)))
-
-                           unless (memq neighbour explored)
-                           append (funcall dfs neighbour explored))))))
+  (letrec ((dfs (lambda (mode &optional explored)
+                  (push mode explored)
+                  (cons mode
+                        (loop for neighbour
+                              in (remove nil (cons (get mode
+                                                        'derived-mode-parent)
+                                                   (gethash mode 
yas--parents)))
+
+                              unless (memq neighbour explored)
+                              append (funcall dfs neighbour explored))))))
     (remove-duplicates (append yas-extra-modes
                                (funcall dfs major-mode)))))