[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/denote a76d6240b1 3/5: Merge pull request #93 from ppre
From: |
ELPA Syncer |
Subject: |
[elpa] externals/denote a76d6240b1 3/5: Merge pull request #93 from pprevos/main |
Date: |
Mon, 15 Aug 2022 06:57:29 -0400 (EDT) |
branch: externals/denote
commit a76d6240b1438bbf9c25b2138612408085957c70
Merge: 07303fd901 0ac3680b15
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: GitHub <noreply@github.com>
Merge pull request #93 from pprevos/main
Update denote--retrieve-filename-title: remove dashes and capitalize
---
denote.el | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/denote.el b/denote.el
index 1193a0e980..ec1e05ea42 100644
--- a/denote.el
+++ b/denote.el
@@ -795,9 +795,10 @@ contain the newline."
"Extract title from FILE name, else return `file-name-base'"
(if (and (file-exists-p file)
(denote--file-has-identifier-p file))
- (progn
- (string-match denote--title-regexp file)
- (match-string 1 file))
+ (let ((file-title (progn
+ (string-match denote--title-regexp file)
+ (match-string 1 file))))
+ (capitalize (replace-regexp-in-string "-" " " file-title)))
(file-name-base file)))
(defun denote--retrieve-title-value (file file-type)