From 16c59ffbbdb9f1843589e26a3215282360d09e6d Mon Sep 17 00:00:00 2001
From: Vasilij Schneidermann <v.schneidermann@gmail.com>
Date: Mon, 3 Mar 2014 12:02:23 +0100
Subject: [PATCH] Explicitly quote lambdas for the byte compiler

---
 eyebrowse.el | 26 +++++++++++++-------------
 1 file changed, 13 insertions(+), 13 deletions(-)

diff --git a/eyebrowse.el b/eyebrowse.el
index 02ded81..e63f3d4 100644
--- a/eyebrowse.el
+++ b/eyebrowse.el
@@ -5,7 +5,7 @@
 ;; Copyright (C) 2014 Vasilij Schneidermann <v.schneidermann@gmail.com>
 
 ;; Author: Vasilij Schneidermann <v.schneidermann@gmail.com>
-;; URL: https://github.com/wasamasa/eyebrowse-mode
+;; URL: https://github.com/wasamasa/eyebrowse
 ;; Version: 0.1
 ;; Package-Requires: ((dash "2.4.0") (s "1.4.0"))
 ;; Keywords: convenience
@@ -108,11 +108,11 @@ If t, switching to the same window config as
     (define-key map (kbd "C-c C-' >") 'eyebrowse-next-window-config)
     (define-key map (kbd "C-c C-' '") 'eyebrowse-last-window-config)
     (define-key map (kbd "C-c C-' \"") 'eyebrowse-close-window-config)
-    (-dotimes 10 (lambda (n)
-                   (define-key map (kbd (s-concat "C-c C-' "
-                                                  (number-to-string n)))
-                     (lambda () (interactive)
-                       (eyebrowse-switch-to-window-config n)))))
+    (-dotimes 10 #'(lambda (n)
+                     (define-key map (kbd (s-concat "C-c C-' "
+                                                    (number-to-string n)))
+                       #'(lambda () (interactive)
+                           (eyebrowse-switch-to-window-config n)))))
     map)
   "Current key map.  Can be set up with `eyebrowse-setup-keys'.")
 
@@ -122,7 +122,7 @@ If t, switching to the same window config as
   "Insert ELEMENT in the list of window configs.
 This function keeps the sortedness intact."
   (setq eyebrowse-window-configs
-        (-sort (lambda (a b) (< (car a) (car b)))
+        (-sort #'(lambda (a b) (< (car a) (car b)))
                (cons element eyebrowse-window-configs))))
 
 (defun eyebrowse-update-window-config-element (old-element new-element)
@@ -180,8 +180,8 @@ last window config."
          (current-slot (number-to-string eyebrowse-current-slot))
          (active-item (propertize current-slot
                                   'face 'eyebrowse-mode-line-active))
-         (window-config-slots (mapcar (lambda (item)
-                                        (number-to-string (car item)))
+         (window-config-slots (mapcar #'(lambda (item)
+                                          (number-to-string (car item)))
                                       eyebrowse-window-configs)))
     (if (and (not (eq eyebrowse-mode-line-style 'hide))
              (or (eq eyebrowse-mode-line-style 'always)
@@ -262,10 +262,10 @@ is detected, it will bind gt, gT, gc and zx, too."
         'eyebrowse-close-window-config)
       (define-key evil-motion-state-map (kbd "zx")
         'eyebrowse-last-window-config))
-    (-dotimes 10 (lambda (n)
-                   (define-key map (kbd (s-concat "M-" (number-to-string n)))
-                     (lambda () (interactive)
-                       (eyebrowse-switch-to-window-config n)))))))
+    (-dotimes 10 #'(lambda (n)
+                     (define-key map (kbd (s-concat "M-" (number-to-string n)))
+                       #'(lambda () (interactive)
+                           (eyebrowse-switch-to-window-config n)))))))
 ;;;###autoload
 (define-minor-mode eyebrowse-mode
   "Toggle `eyebrowse-mode'.