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

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

[elpa] externals/denote 60a91fc6ef 044/355: Use correct notation for pri


From: ELPA Syncer
Subject: [elpa] externals/denote 60a91fc6ef 044/355: Use correct notation for private variables
Date: Sun, 26 Jun 2022 23:57:58 -0400 (EDT)

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

    Use correct notation for private variables
---
 denote.el | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/denote.el b/denote.el
index 82bdbe435d..2361fb6275 100644
--- a/denote.el
+++ b/denote.el
@@ -84,13 +84,13 @@ If nil, show the keywords in their given order."
 
 ;;;; Main variables
 
-(defconst denote-id "%Y%m%d_%H%M%S"
+(defconst denote--id "%Y%m%d_%H%M%S"
   "Format of ID prefix of a note's filename.")
 
-(defconst denote-id-regexp "\\([0-9_]+\\{15\\}\\)"
-  "Regular expression to match `denote-id'.")
+(defconst denote--id-regexp "\\([0-9_]+\\{15\\}\\)"
+  "Regular expression to match `denote--id'.")
 
-(defconst denote-keyword-regexp "\\(--\\)\\([0-9A-Za-z_+]*\\)\\(--\\)"
+(defconst denote--keyword-regexp "\\(--\\)\\([0-9A-Za-z_+]*\\)\\(--\\)"
   "Regular expression to match `denote-keywords'.")
 
 (defconst denote--punctuation-regexp "[][{}!@#$%^&*()_=+'\"?,.\|;:~`‘’“”]*"
@@ -184,7 +184,7 @@ With optional N, search in the Nth line from point."
   (delq nil (mapcar
              (lambda (x)
                (denote--extract
-                (concat denote-id-regexp denote-keyword-regexp) x 3))
+                (concat denote--id-regexp denote--keyword-regexp) x 3))
              (denote--directory-files))))
 
 (defun denote--inferred-keywords ()
@@ -282,7 +282,7 @@ Format current time, else use optional ID."
   (setq denote-last-path
         (denote--format-file
          (file-name-as-directory denote-directory)
-         (format-time-string denote-id)
+         (format-time-string denote--id)
          keywords
          (denote--sluggify title))))
 
@@ -294,7 +294,7 @@ Use optional PATH, else create it with `denote--path'."
          (buffer (unless path (find-file p)))
          (header (denote--file-meta-header
                   title (format-time-string "%F") keywords p
-                  (format-time-string denote-id))))
+                  (format-time-string denote--id))))
     (unless path
       (with-current-buffer buffer (insert header))
       (setq denote-last-buffer buffer))



reply via email to

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