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

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

[elpa] externals/denote 683180bcfc 206/355: Remove superfluous function


From: ELPA Syncer
Subject: [elpa] externals/denote 683180bcfc 206/355: Remove superfluous function and var
Date: Sun, 26 Jun 2022 23:58:24 -0400 (EDT)

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

    Remove superfluous function and var
    
    I believe we were using those in the early code that inserted backlinks
    in files.  Now it is not required.
---
 denote.el | 23 -----------------------
 1 file changed, 23 deletions(-)

diff --git a/denote.el b/denote.el
index 0804cf30dc..b5fe4f9365 100644
--- a/denote.el
+++ b/denote.el
@@ -278,29 +278,6 @@ trailing hyphen."
   "Return non-nil if FILE is empty."
   (zerop (or (file-attribute-size (file-attributes file)) 0)))
 
-(defvar denote--line-regexp-alist
-  '((empty . "[\s\t]*$")
-    (indent . "^[\s\t]+")
-    (non-empty . "^.+$")
-    (list . "^\\([\s\t#*+]+\\|[0-9]+[^\s]?[).]+\\)")
-    (heading . "^\\*+ +"))              ; assumes Org markup
-  "Alist of regexp types used by `denote-line-regexp-p'.")
-
-(defun denote--line-regexp-p (type &optional n)
-  "Test for TYPE on line.
-TYPE is the car of a cons cell in
-`denote--line-regexp-alist'.  It matches a regular
-expression.
-
-With optional N, search in the Nth line from point."
-  (save-excursion
-    (goto-char (point-at-bol))
-    (and (not (bobp))
-         (or (beginning-of-line n) t)
-         (save-match-data
-           (looking-at
-            (alist-get type denote--line-regexp-alist))))))
-
 ;;;; Keywords
 
 (defun denote--directory-files (&optional absolute)



reply via email to

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