emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/denote 29b6ec1aad 5/5: Add desluggify in denote--retrie


From: ELPA Syncer
Subject: [elpa] externals/denote 29b6ec1aad 5/5: Add desluggify in denote--retrieve-filename-title
Date: Mon, 15 Aug 2022 06:57:29 -0400 (EDT)

branch: externals/denote
commit 29b6ec1aadaac23b703c02e17f5cd9f110953790
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Add desluggify in denote--retrieve-filename-title
    
    Builds on commit fe348c5.
    
    This is based on the idea of Peter Prevos from commit 0ac3680.  Peter
    sent the code on the GitHub mirror, as pull request 93:
    <https://github.com/protesilaos/denote/pull/93>.
---
 denote.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/denote.el b/denote.el
index a54b313e22..cb21a48f00 100644
--- a/denote.el
+++ b/denote.el
@@ -799,10 +799,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))
-      (let ((file-title (progn
-                          (string-match denote--title-regexp file)
-                          (match-string 1 file))))
-             (capitalize (replace-regexp-in-string "-" " " file-title)))
+      (denote--desluggify
+       (progn
+         (string-match denote--title-regexp file)
+         (match-string 1 file)))
     (file-name-base file)))
 
 (defun denote--retrieve-title-value (file file-type)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]