From b41be0ee83bdcc7882b360b66105f192503f0dc7 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Simen=20Heggest=C3=B8yl?= Date: Thu, 4 Jun 2020 19:29:10 +0200 Subject: [PATCH] ; Small cleanup in project.el * lisp/progmodes/project.el (project--add-to-project-list-front): Minor simplification after recent changes. --- lisp/progmodes/project.el | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el index c701b801599..c5b6209d9b4 100644 --- a/lisp/progmodes/project.el +++ b/lisp/progmodes/project.el @@ -787,9 +787,8 @@ Arguments the same as in `compile'." "Add project PR to the front of the project list. Save the result to disk if the project list was changed." (project--ensure-read-project-list) - (let* ((dir (project-root pr)) - (do-write (not (equal (car project--list) dir)))) - (when do-write + (let ((dir (project-root pr))) + (unless (equal (car project--list) dir) (setq project--list (delete dir project--list)) (push dir project--list) (project--write-project-list)))) -- 2.39.2