branch: elpa/age
commit 0c94618fc10105da751007f90b44075f6e5d61ba
Author: Bas Alberts <[email protected]>
Commit: Bas Alberts <[email protected]>
v0.1.4
Addresses MELPA review feedback.
---
age.el | 22 +++++++++++-----------
1 file changed, 11 insertions(+), 11 deletions(-)
diff --git a/age.el b/age.el
index 80016c73d53..6d6daa3f69b 100644
--- a/age.el
+++ b/age.el
@@ -9,27 +9,27 @@
;; Homepage: https://github.com/anticomputer/age.el
;; Package-Requires: ((emacs "28.1"))
;; Keywords: data
-;; Version: 0.1.3
-
-;; This is a port of epg.el and epa-file.el, original copyright applies.
+;; Version: 0.1.4
;; This file is NOT part of GNU Emacs.
-;; GNU Emacs is free software: you can redistribute it and/or modify
+;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation, either version 3 of the License, or
;; (at your option) any later version.
-;; GNU Emacs is distributed in the hope that it will be useful,
+;; This program is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; GNU General Public License for more details.
;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs. If not, see <https://www.gnu.org/licenses/>.
+;; along with this program. If not, see <https://www.gnu.org/licenses/>.
;;; Commentary:
+;; This is a port of epg.el and epa-file.el, original copyright applies.
+
;; age.el is intended to provide transparent Age based file encryption
;; and decryption in Emacs. As such age.el does not support all
;; Age CLI based use cases. Rather age.el assumes you have configured
@@ -61,7 +61,7 @@
(defconst age-package-name "age"
"Name of this package.")
-(defconst age-version-number "0.1.3"
+(defconst age-version-number "0.1.4"
"Version number of this package.")
;;; Options
@@ -835,7 +835,7 @@ May either be a string or a list of strings.")
(when age-encryption-mode
(age-advise-tramp)
(setq file-name-handler-alist (cons age-file-handler
file-name-handler-alist))
- (add-hook 'find-file-hook 'age-file-find-file-hook)
+ (add-hook 'find-file-hook #'age-file-find-file-hook)
(setq auto-mode-alist (cons age-file-auto-mode-alist-entry
auto-mode-alist))))
(put 'age-file-handler 'safe-magic t)
@@ -1097,7 +1097,7 @@ of the function `insert-file-contents'."
;; `find-file-noselect-1'.
(setq-local age-file-error error)
(add-hook 'find-file-not-found-functions
- 'age-file--find-file-not-found-function
+ #'age-file--find-file-not-found-function
nil t)))
(signal (if exists 'file-error 'file-missing)
(cons "Opening input file" (cdr error))))))
@@ -1282,7 +1282,7 @@ function `write-region'."
(message "`age-file' already enabled")
(setq file-name-handler-alist
(cons age-file-handler file-name-handler-alist))
- (add-hook 'find-file-hook 'age-file-find-file-hook)
+ (add-hook 'find-file-hook #'age-file-find-file-hook)
(setq auto-mode-alist (cons age-file-auto-mode-alist-entry
auto-mode-alist))
(message "`age-file' enabled")))
@@ -1295,7 +1295,7 @@ function `write-region'."
(progn
(setq file-name-handler-alist
(delq age-file-handler file-name-handler-alist))
- (remove-hook 'find-file-hook 'age-file-find-file-hook)
+ (remove-hook 'find-file-hook #'age-file-find-file-hook)
(setq auto-mode-alist (delq age-file-auto-mode-alist-entry
auto-mode-alist))
(message "`age-file' disabled"))
