emacs/protesilaos.denote
1
0
Fork 0
mirror of https://github.com/protesilaos/denote.git synced 2026-09-10 07:16:20 -04:00
Code Issues Actions Packages Projects Releases Wiki Activity

Add denote--file-empty-p

Browse source
This commit is contained in:
Protesilaos Stavrou 2022-06-06 14:14:24 +03:00
parent 813004ea53
commit 387ac0c030
No known key found for this signature in database
GPG key ID: 99BD6459CD5CA3EA
1 changed files with 4 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
denote.el
View file

@ -139,6 +139,10 @@ trailing hyphen."
"Make STR an appropriate file name slug." "Make STR an appropriate file name slug."
(downcase (denote--slug-hyphenate (denote--slug-no-punct str)))) (downcase (denote--slug-hyphenate (denote--slug-no-punct str))))
(defun denote--file-empty-p (file)
"Return non-nil if FILE is empty."
(zerop (or (file-attribute-size (file-attributes file)) 0)))
;;;; Keywords ;;;; Keywords
(defun denote--directory-files () (defun denote--directory-files ()