diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2022-12-18 15:19:14 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2022-12-18 15:19:53 -0700 |
commit | cc1a70fcda85ee62207346db97060f9b8f9d9b20 (patch) | |
tree | 48f5577dfaf710aa23d534ae7174721caec17d9b | |
parent | 3d404ef37e6f7303bba74a8cf413aaa8b8672ef5 (diff) | |
download | mailscripts-cc1a70fcda85ee62207346db97060f9b8f9d9b20.tar.gz |
mailscripts.el: fix usage of cl-case in an internal function
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
-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 |