From f2b40efab09b74a4a03fe2dfd14afe246d005ac1 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=E5=88=98=E5=86=B2?= Date: Tue, 19 Jan 2021 12:55:47 +0800 Subject: [PATCH] gyp: update gyp.el to change case to cl-case MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit ‘case’ is an obsolete alias (as of 27.1); use ‘cl-case’ instead. --- tools/emacs/gyp-tests.el | 2 +- tools/emacs/gyp.el | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/tools/emacs/gyp-tests.el b/tools/emacs/gyp-tests.el index 11b84978..07afc58a 100644 --- a/tools/emacs/gyp-tests.el +++ b/tools/emacs/gyp-tests.el @@ -30,7 +30,7 @@ "For the purposes of face comparison, we're not interested in the differences between certain faces. For example, the difference between font-lock-comment-delimiter and font-lock-comment-face." - (case face + (cl-case face ((font-lock-comment-delimiter-face) font-lock-comment-face) (t face))) diff --git a/tools/emacs/gyp.el b/tools/emacs/gyp.el index b98b155c..042ff3a9 100644 --- a/tools/emacs/gyp.el +++ b/tools/emacs/gyp.el @@ -213,7 +213,7 @@ string-start) (setq string-start (gyp-parse-to limit)) (if string-start - (setq group (case (gyp-section-at-point) + (setq group (cl-case (gyp-section-at-point) ('dependencies 1) ('variables 2) ('conditions 2)