branch: elpa/geiser
commit 52ae251eb6ec868890a38564e462fdea69a70ee0
Author: jao <[email protected]>
Commit: jao <[email protected]>
lexical scope for completion and connection
---
elisp/geiser-completion.el | 4 ++--
elisp/geiser-connection.el | 7 +++----
2 files changed, 5 insertions(+), 6 deletions(-)
diff --git a/elisp/geiser-completion.el b/elisp/geiser-completion.el
index 599e72ff0d..4064af7e4c 100644
--- a/elisp/geiser-completion.el
+++ b/elisp/geiser-completion.el
@@ -1,6 +1,6 @@
-;;; geiser-completion.el -- tab completion
+;;; geiser-completion.el -- tab completion -*- lexical-binding: t; -*-
-;; Copyright (C) 2009, 2010, 2011, 2012, 2018, 2020, 2021, 2022 Jose Antonio
Ortega Ruiz
+;; Copyright (C) 2009-2012, 2018, 2020-2022 Jose Antonio Ortega Ruiz
;; This program is free software; you can redistribute it and/or
;; modify it under the terms of the Modified BSD License. You should
diff --git a/elisp/geiser-connection.el b/elisp/geiser-connection.el
index c1d5712d2b..268e123d8a 100644
--- a/elisp/geiser-connection.el
+++ b/elisp/geiser-connection.el
@@ -1,6 +1,6 @@
-;;; geiser-connection.el -- talking to a scheme process
+;;; geiser-connection.el -- talking to a scheme process -*- lexical-binding:
t; -*-
-;; Copyright (C) 2009, 2010, 2011, 2013, 2021 Jose Antonio Ortega Ruiz
+;; Copyright (C) 2009-2011, 2013, 2021-2022 Jose Antonio Ortega Ruiz
;; This program is free software; you can redistribute it and/or
;; modify it under the terms of the Modified BSD License. You should
@@ -70,8 +70,7 @@
(defun geiser-con--tq-create (process)
(let ((tq (tq-create process)))
- (set-process-filter process
- `(lambda (p s) (geiser-con--tq-filter ',tq s)))
+ (set-process-filter process (lambda (_p s) (geiser-con--tq-filter tq s)))
tq))
(defun geiser-con--tq-filter (tq in)
