summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/progmodes/project.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el
index 35ce5eb2d15..5996a764885 100644
--- a/lisp/progmodes/project.el
+++ b/lisp/progmodes/project.el
@@ -920,8 +920,7 @@ if one already exists."
(let* ((default-directory (project-root (project-current t)))
(default-project-shell-name
(concat "*" (file-name-nondirectory
- (directory-file-name
- (file-name-directory default-directory)))
+ (directory-file-name default-directory))
"-shell*"))
(shell-buffer (get-buffer default-project-shell-name)))
(if (and shell-buffer (not current-prefix-arg))
@@ -940,8 +939,7 @@ if one already exists."
(let* ((default-directory (project-root (project-current t)))
(eshell-buffer-name
(concat "*" (file-name-nondirectory
- (directory-file-name
- (file-name-directory default-directory)))
+ (directory-file-name default-directory))
"-eshell*"))
(eshell-buffer (get-buffer eshell-buffer-name)))
(if (and eshell-buffer (not current-prefix-arg))
@@ -1323,6 +1321,7 @@ to distinguish the menu entries in the dispatch menu. If KEY is
absent, COMMAND must be bound in `project-prefix-map', and the
key is looked up in that map."
:version "28.1"
+ :group 'project
:package-version '(project . "0.6.0")
:type '(repeat
(list
@@ -1339,6 +1338,7 @@ listed in `project-switch-commands' and signal an error when
others are invoked. Otherwise, all keys in `project-prefix-map'
are legal even if they aren't listed in the dispatch menu."
:type 'boolean
+ :group 'project
:version "28.1")
(defun project--keymap-prompt ()