Function: denote-get-file-extension
denote-get-file-extension is a byte-compiled function defined in
denote.el.
Signature
(denote-get-file-extension FILE)
Documentation
Return extension of FILE with dot included.
Account for denote-encryption-file-extensions. In other words,
return something like .org.gpg if it is part of the file, else
return .org.
Source Code
;; Defined in ~/.emacs.d/elpa/denote-4.2.3/denote.el
(defun denote-get-file-extension (file)
"Return extension of FILE with dot included.
Account for `denote-encryption-file-extensions'. In other words,
return something like .org.gpg if it is part of the file, else
return .org."
(let ((outer-extension (file-name-extension file :period)))
(if-let* (((member outer-extension denote-encryption-file-extensions))
(file (file-name-sans-extension file))
(inner-extension (file-name-extension file :period)))
(concat inner-extension outer-extension)
outer-extension)))