File 2878-Emacs-erlang-mode-bump-versions-and-refactor-flet-ex.patch of Package erlang
From 98cff9adff7c11f72d5466bdc8b4336523837520 Mon Sep 17 00:00:00 2001
From: Kjell Winblad <kjellwinblad@gmail.com>
Date: Tue, 15 Oct 2019 16:10:38 +0200
Subject: [PATCH 08/10] Emacs erlang-mode: bump versions and refactor flet
expressions
This commit refactors away the flet expressions that existed in
erlang-eunit.el and erlang-flymake.el. Emacs lisp flet expressions
have been deprecated in since Emacs version 24.3.
The version number for erlang-mode is also bumped and the required
minimum Emacs version is increased from 24.1 to 24.3.
---
lib/tools/emacs/erlang-eunit.el | 4 ++--
lib/tools/emacs/erlang-flymake.el | 4 ++--
lib/tools/emacs/erlang.el | 6 +++---
3 files changed, 7 insertions(+), 7 deletions(-)
diff --git a/lib/tools/emacs/erlang-eunit.el b/lib/tools/emacs/erlang-eunit.el
index 53543d7b01..52c5783806 100644
--- a/lib/tools/emacs/erlang-eunit.el
+++ b/lib/tools/emacs/erlang-eunit.el
@@ -22,7 +22,7 @@
;;; Author: Klas Johansson
(eval-when-compile
- (require 'cl))
+ (require 'cl-lib))
(require 'erlang)
(defvar erlang-eunit-src-candidate-dirs '("../src" ".")
@@ -319,7 +319,7 @@ With prefix arg, compiles for debug and runs tests with the verbose flag set."
;; instead of possibly several: one for each file to compile,
;; for instance for both x.erl and x_tests.erl.
(save-some-buffers erlang-eunit-autosave)
- (flet ((save-some-buffers (&optional any) nil))
+ (cl-letf (((symbol-function 'save-some-buffers) #'ignore))
;; Compilation of the source file is mandatory (the file must
;; exist, otherwise the procedure is aborted). Compilation of the
diff --git a/lib/tools/emacs/erlang-flymake.el b/lib/tools/emacs/erlang-flymake.el
index 0b7936a81f..4e4da51e7a 100644
--- a/lib/tools/emacs/erlang-flymake.el
+++ b/lib/tools/emacs/erlang-flymake.el
@@ -22,7 +22,7 @@
(require 'flymake)
(eval-when-compile
- (require 'cl))
+ (require 'cl-lib))
(defvar erlang-flymake-command
"erlc"
@@ -68,7 +68,7 @@ check on newline and when there are no changes)."
(defun erlang-flymake-init ()
(let* ((temp-file
- (flet ((flymake-get-temp-dir () (erlang-flymake-temp-dir)))
+ (cl-letf (((symbol-function 'flymake-get-temp-dir) #'erlang-flymake-temp-dir))
(flymake-init-create-temp-buffer-copy
'flymake-create-temp-with-folder-structure)))
(code-dir-opts
diff --git a/lib/tools/emacs/erlang.el b/lib/tools/emacs/erlang.el
index a8f17a364b..c95ef14ae6 100644
--- a/lib/tools/emacs/erlang.el
+++ b/lib/tools/emacs/erlang.el
@@ -4,8 +4,8 @@
;; Author: Anders Lindgren
;; Keywords: erlang, languages, processes
;; Date: 2011-12-11
-;; Version: 2.8.2
-;; Package-Requires: ((emacs "24.1"))
+;; Version: 2.8.3
+;; Package-Requires: ((emacs "24.3"))
;; %CopyrightBegin%
;;
@@ -87,7 +87,7 @@
"The Erlang programming language."
:group 'languages)
-(defconst erlang-version "2.8.2"
+(defconst erlang-version "2.8.3"
"The version number of Erlang mode.")
(defcustom erlang-root-dir nil
--
2.16.4