[Projects] Cosmetics

This commit is contained in:
Daniel - 2018-08-18 10:15:21 +02:00
parent 45d8f2c79e
commit e1a05acdec
Signed by: dbo
GPG Key ID: 4F63DB96D45AA9C6
1 changed files with 2 additions and 2 deletions

View File

@ -58,8 +58,8 @@
(defun projects-archive-project (short-name)
"Archive existing project."
(interactive (list
(completing-read "Short Name: " (projects-existing-projects) nil t)))
(interactive
(list (completing-read "Short Name: " (projects-existing-projects) nil t)))
(unless (projects-project-exists-p short-name)
(user-error "Project %s does not exist, exiting" short-name))
(unless (file-exists-p projects-archive-directory)