[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master b41be0e 1/3: ; Small cleanup in project.el
From: |
Simen Heggestøyl |
Subject: |
master b41be0e 1/3: ; Small cleanup in project.el |
Date: |
Thu, 4 Jun 2020 14:17:33 -0400 (EDT) |
branch: master
commit b41be0ee83bdcc7882b360b66105f192503f0dc7
Author: Simen Heggestøyl <simenheg@gmail.com>
Commit: Simen Heggestøyl <simenheg@gmail.com>
; 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 c701b80..c5b6209 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))))