0e67c0eba2
Ignore the nov-places file produced by nov.el Fix link formatting Add features to README Format README Remove trailing whitespace
82 lines
2.5 KiB
EmacsLisp
82 lines
2.5 KiB
EmacsLisp
;;; packages.el --- epub layer packages file for Spacemacs.
|
|
;;
|
|
;; Copyright (c) 2012-2017 Sylvain Benner & Contributors
|
|
;;
|
|
;; Author: Jeremy Dormitzer <jeremy.dormitzer@gmail.com>
|
|
;; URL: https://github.com/syl20bnr/spacemacs
|
|
;;
|
|
;; This file is not part of GNU Emacs.
|
|
;;
|
|
;;; License: GPLv3
|
|
|
|
;;; Commentary:
|
|
|
|
;; See the Spacemacs documentation and FAQs for instructions on how to implement
|
|
;; a new layer:
|
|
;;
|
|
;; SPC h SPC layers RET
|
|
;;
|
|
;;
|
|
;; Briefly, each package to be installed or configured by this layer should be
|
|
;; added to `epub-packages'. Then, for each package PACKAGE:
|
|
;;
|
|
;; - If PACKAGE is not referenced by any other Spacemacs layer, define a
|
|
;; function `epub/init-PACKAGE' to load and initialize the package.
|
|
|
|
;; - Otherwise, PACKAGE is already referenced by another Spacemacs layer, so
|
|
;; define the functions `epub/pre-init-PACKAGE' and/or
|
|
;; `epub/post-init-PACKAGE' to customize the package as it is loaded.
|
|
|
|
;;; Code:
|
|
|
|
(defconst epub-packages
|
|
'((nov :location elpa))
|
|
"The list of Lisp packages required by the epub layer.
|
|
|
|
Each entry is either:
|
|
|
|
1. A symbol, which is interpreted as a package to be installed, or
|
|
|
|
2. A list of the form (PACKAGE KEYS...), where PACKAGE is the
|
|
name of the package to be installed or loaded, and KEYS are
|
|
any number of keyword-value-pairs.
|
|
|
|
The following keys are accepted:
|
|
|
|
- :excluded (t or nil): Prevent the package from being loaded
|
|
if value is non-nil
|
|
|
|
- :location: Specify a custom installation location.
|
|
The following values are legal:
|
|
|
|
- The symbol `elpa' (default) means PACKAGE will be
|
|
installed using the Emacs package manager.
|
|
|
|
- The symbol `local' directs Spacemacs to load the file at
|
|
`./local/PACKAGE/PACKAGE.el'
|
|
|
|
- A list beginning with the symbol `recipe' is a melpa
|
|
recipe. See: https://github.com/milkypostman/melpa#recipe-format")
|
|
|
|
(defun epub/setup-nov-major-mode-keys ()
|
|
(spacemacs/set-leader-keys-for-major-mode 'nov-mode
|
|
"g" 'nov-render-document
|
|
"v" 'nov-view-source
|
|
"V" 'nov-view-content-source
|
|
"m" 'nov-display-metadata
|
|
"n" 'nov-next-document
|
|
"]" 'nov-next-document
|
|
"p" 'nov-previous-document
|
|
"[" 'nov-previous-document
|
|
"t" 'nov-goto-toc))
|
|
|
|
(defun epub/init-nov ()
|
|
(let ((epub/nov-text-width
|
|
(if (boundp 'epub-nov-text-width) epub-nov-text-width 80)))
|
|
(use-package nov
|
|
:mode ("\\.epub\\'" . nov-mode)
|
|
:init (setq nov-text-width epub/nov-text-width)
|
|
:config (epub/setup-nov-major-mode-keys))))
|
|
|
|
;;; packages.el ends here
|