From bcebcda3c48d7bdba2d2e458cee7da4b6d61a7a0 Mon Sep 17 00:00:00 2001 From: Tianxiang Xiong Date: Thu, 7 Sep 2017 02:02:05 -0700 Subject: Use `defvar-local` `defvar-local` has been available since Emacs 24.3. --- nov.el | 21 +++++++-------------- 1 file changed, 7 insertions(+), 14 deletions(-) diff --git a/nov.el b/nov.el index bd98752..3c9595d 100644 --- a/nov.el +++ b/nov.el @@ -58,34 +58,27 @@ :type '(file :must-match t) :group 'nov) -(defvar nov-temp-dir nil +(defvar-local nov-temp-dir nil "Temporary directory containing the buffer's EPUB files.") -(make-variable-buffer-local 'nov-temp-dir) -(defvar nov-content-file nil +(defvar-local nov-content-file nil "Path of the EPUB buffer's .opf file.") -(make-variable-buffer-local 'nov-content-file) -(defvar nov-epub-version nil +(defvar-local nov-epub-version nil "Version string of the EPUB buffer.") -(make-variable-buffer-local 'nov-epub-version) -(defvar nov-metadata nil +(defvar-local nov-metadata nil "Metadata of the EPUB buffer.") -(make-variable-buffer-local 'nov-metadata) -(defvar nov-documents nil +(defvar-local nov-documents nil "Alist for the EPUB buffer's documents. Each alist item consists of the identifier and full path.") -(make-variable-buffer-local 'nov-documents) -(defvar nov-documents-index 0 +(defvar-local nov-documents-index 0 "Index of the currently rendered document in the EPUB buffer.") -(make-variable-buffer-local 'nov-documents-index) -(defvar nov-toc-id nil +(defvar-local nov-toc-id nil "TOC identifier of the EPUB buffer.") -(make-variable-buffer-local 'nov-toc-id) (defun nov-make-path (directory file) "Create a path from DIRECTORY and FILE." -- cgit v1.2.3