From 1d01ad41c9dd58b6dd4f7cc63c0abab9558a649b Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Mon, 4 Nov 2013 14:25:09 -0500 Subject: [PATCH] * lisp/emacs-lisp/helpers.el: Move from helpers.el. Use lexical-binding. --- lisp/ChangeLog | 2 ++ lisp/{ => emacs-lisp}/helpers.el | 6 +++--- 2 files changed, 5 insertions(+), 3 deletions(-) rename lisp/{ => emacs-lisp}/helpers.el (84%) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index f6f3a276afe..d3760e4c626 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,7 @@ 2013-11-04 Stefan Monnier + * emacs-lisp/helpers.el: Move from helpers.el. Use lexical-binding. + * progmodes/python.el: Fix up last change. (python-shell--save-temp-file): New function. (python-shell-send-string): Use it. Remove `msg' arg. Don't assume diff --git a/lisp/helpers.el b/lisp/emacs-lisp/helpers.el similarity index 84% rename from lisp/helpers.el rename to lisp/emacs-lisp/helpers.el index 51361043eb2..73c2ff1c15c 100644 --- a/lisp/helpers.el +++ b/lisp/emacs-lisp/helpers.el @@ -1,4 +1,4 @@ -;;; helpers.el --- Some non-essential library extensions +;;; helpers.el --- Some non-essential library extensions -*- lexical-binding:t -*- ;; Copyright (C) 2013 Free Software Foundation, Inc. @@ -28,13 +28,13 @@ (defsubst hash-table-keys (hash-table) "Return a list of keys in HASH-TABLE." (let ((keys '())) - (maphash (lambda (k v) (push k keys)) hash-table) + (maphash (lambda (k _v) (push k keys)) hash-table) keys)) (defsubst hash-table-values (hash-table) "Return a list of values in HASH-TABLE." (let ((values '())) - (maphash (lambda (k v) (push v values)) hash-table) + (maphash (lambda (_k v) (push v values)) hash-table) values)) (provide 'helpers) -- 2.39.2