diff options
-rw-r--r-- | debian/changelog | 3 | ||||
-rw-r--r-- | mailscripts.el | 6 |
2 files changed, 5 insertions, 4 deletions
diff --git a/debian/changelog b/debian/changelog index 9f9a539..223c3c8 100644 --- a/debian/changelog +++ b/debian/changelog @@ -2,7 +2,8 @@ mailscripts (28-1) UNRELEASED; urgency=medium * mailscripts.el: - new commands: mailscripts-git-format-patch-{attach,drafts} - - new DWIM wrapper command: mailscripts-prepare-patch. + - new DWIM wrapper command: mailscripts-prepare-patch + - fix usage of cl-case in an internal function. -- Sean Whitton <spwhitton@spwhitton.name> Sun, 18 Dec 2022 10:40:55 -0700 diff --git a/mailscripts.el b/mailscripts.el index 5a55b79..f3e1e53 100644 --- a/mailscripts.el +++ b/mailscripts.el @@ -328,14 +328,14 @@ See also the interactive wrapper command `mailscripts-prepare-patch'." (defun mailscripts--project-repo-and-branch (f &rest args) (let ((repo (cl-case mailscripts-project-library - ('project + (project (require 'project) (project-prompt-project-dir)) - ('projectile + (projectile (require 'projectile) (projectile-completing-read "Select Projectile project: " projectile-known-projects)) - (nil + (t (user-error "Please customize variable `mailscripts-project-library'.")))) (branch (read-from-minibuffer |