Replace lexical-let with normal let

An older PR reintroduced a dependency on lexical let.
There is no proper replacement for this in cl-lib therefore
I have changed it to a normal let which works the same
way.

In future we should think of making the entire file lexically bound
and only mark the exceptions to be dynamically bound.
This commit is contained in:
Maximilian Wolff 2019-12-20 10:24:17 +01:00
parent 0417379a2f
commit beff6ec914
No known key found for this signature in database
GPG key ID: 2DD07025BFDBD89A

View file

@ -89,11 +89,11 @@ open a junk Rust file, type in some code and quickly run it.
If you want to use third-party crates, create a new project using `cargo-process-new' and run
using `cargo-process-run'."
(interactive)
(lexical-let ((input-file-name (buffer-file-name))
(output-file-name (concat temporary-file-directory
(file-name-nondirectory (buffer-file-name))
"-"
(md5 (buffer-file-name)))))
(let ((input-file-name (buffer-file-name))
(output-file-name (concat temporary-file-directory
(file-name-nondirectory (buffer-file-name))
"-"
(md5 (buffer-file-name)))))
(add-to-list 'compilation-finish-functions
(lambda (buffer status)
(if (string-match "finished" status)