From d365f2265bcfbc43c7d291c7e3dabab704b63ac6 Mon Sep 17 00:00:00 2001 From: Magnar Sveen Date: Sat, 17 Aug 2013 11:00:18 +0200 Subject: [PATCH] Fix byte compile warnings - args with underscore are known to be ignored --- dash-functional.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/dash-functional.el b/dash-functional.el index d7e70bf..7d21e23 100644 --- a/dash-functional.el +++ b/dash-functional.el @@ -83,7 +83,7 @@ Available by `(require 'dash-functional)`. Requires Emacs 24 or higher." In types: a -> b -> a Available by `(require 'dash-functional)`. Requires Emacs 24 or higher." - (lambda (&rest args) c)) + (lambda (&rest _) c)) (defmacro -cut (&rest params) "Take n-ary function and n arguments and specialize some of them. @@ -93,7 +93,7 @@ See SRFI-26 for detailed description. Available by `(require 'dash-functional)`. Requires Emacs 24 or higher." (let* ((i 0) - (args (mapcar (lambda (x) (setq i (1+ i)) (make-symbol (format "D%d" i))) + (args (mapcar (lambda (_) (setq i (1+ i)) (make-symbol (format "D%d" i))) (-filter (-partial 'eq '<>) params)))) `(lambda ,args ,(--map (if (eq it '<>) (pop args) it) params))))