diff options
author | Kyle Meyer <kyle@kyleam.com> | 2020-08-16 14:51:29 -0400 |
---|---|---|
committer | Kyle Meyer <kyle@kyleam.com> | 2020-08-16 21:39:40 -0400 |
commit | 2b658414c62ee00266fa24a7f7c4685b9d2276d8 (patch) | |
tree | 66be7f67f632e1828da840bfde535190eff55f53 | |
parent | 9cfa6e709c0c364e12ff58216eebc825274813a1 (diff) | |
download | piem-2b658414c62ee00266fa24a7f7c4685b9d2276d8.tar.gz |
piem-inbox-coderepo-maybe-read: Include current projectile project
When piem-inbox-coderepo-maybe-read is called from within a project,
the current project isn't included in the collection because
projectile-relevant-known-projects excludes it when
projectile-current-project-on-switch is at its default value. That's
undesirable in this context; if there's a current project, it's likely
the one of interest (e.g., calling piem-b4-am-ready-from-mbox from a
project's directory).
Add the current project to the collection and make it the default.
Also, don't bother going down the projectile branch if there are no
known projects.
Message-Id: <20200816185130.32703-3-kyle@kyleam.com>
-rw-r--r-- | piem.el | 9 |
1 files changed, 6 insertions, 3 deletions
@@ -294,11 +294,14 @@ intended to be used by libraries implementing a function for "Like `piem-inbox-coderepo', but fall back to reading the repo." (let ((inbox (or (piem-inbox-coderepo) - (and (fboundp 'projectile-relevant-known-projects) + (and (bound-and-true-p projectile-known-projects) (completing-read "Project: " - (projectile-relevant-known-projects) - nil t)) + projectile-known-projects nil t nil nil + (when-let ((current (and (fboundp 'projectile-project-root) + (projectile-project-root)))) + (abbreviate-file-name current)))) + (and piem-use-magit (fboundp 'magit-read-repository) (magit-read-repository)) |