From 1b567f5a67de1151b76b279311a73a7bf7174c12 Mon Sep 17 00:00:00 2001 From: Randy Taylor Date: Thu, 1 Dec 2022 22:12:07 -0500 Subject: [PATCH] Use file-name-nondirectory to determine default project-name * lisp/progmodes/project.el (project-name): Use file-name-nondirectory instead of file-name-base (bug#59756). --- lisp/progmodes/project.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el index 3f4a5fb04bc..38d4fdad5fc 100644 --- a/lisp/progmodes/project.el +++ b/lisp/progmodes/project.el @@ -1,7 +1,7 @@ ;;; project.el --- Operations on the current project -*- lexical-binding: t; -*- ;; Copyright (C) 2015-2022 Free Software Foundation, Inc. -;; Version: 0.9.1 +;; Version: 0.9.2 ;; Package-Requires: ((emacs "26.1") (xref "1.4.0")) ;; This is a GNU ELPA :core package. Avoid using functionality that @@ -278,7 +278,7 @@ headers search path, load path, class path, and so on." (cl-defgeneric project-name (project) "A human-readable name for the project. Nominally unique, but not enforced." - (file-name-base (directory-file-name (project-root project)))) + (file-name-nondirectory (directory-file-name (project-root project)))) (cl-defgeneric project-ignores (_project _dir) "Return the list of glob patterns to ignore inside DIR. -- 2.39.5