summaryrefslogtreecommitdiff
path: root/polymode-methods.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2022-08-20 12:30:23 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2022-08-20 12:30:23 -0400
commit63d2c2184941902e2358d0e9b0deb17b943db61a (patch)
treee6c6fcc94331c32b306232147a605a6b5d3b3076 /polymode-methods.el
parenteb793e18ad9c9c41aa01b94592cbd51da08a3ada (diff)
Fix copyrights for GNU ELPAscratch/polymode
Assign the Copyright to the FSF. Include various other minor and cosmetic changes: - Prefer #' to quote function names. - Fix a few uses of ' in docstrings which can be rendered incorrectly. - Remove redundant `:group` args. - Use keyword args for `define-minor-mode` rather than obsolete positional arguments. - Use `lexical-binding`. - Add a `Copyright` line where missing. * polymode-classes.el (pm-chunkmode, pm-inner-chunkmode): Use `symbol` rather than `face` as type, since `face` is not actually defined as a type. * polymode-compat.el: Use `with-eval-after-load` throughout. * polymode-core.el: Don't use #' to quote the symbol passed to `advice-add` because this arg can't be just a function, it has to be a symbol. (pm-use-cache): Move before first use. * template/targets/utils.el (polymode-add-deps-to-load-path): Make better use of `expand-file-name`. * tests/compat-tests.el: Skip tests if `poly-markdown` is not available, instead of signaling an error.
Diffstat (limited to 'polymode-methods.el')
-rw-r--r--polymode-methods.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/polymode-methods.el b/polymode-methods.el
index eadd92c..0fd9841 100644
--- a/polymode-methods.el
+++ b/polymode-methods.el
@@ -1,6 +1,6 @@
;;; polymode-methods.el --- Methods for polymode classes -*- lexical-binding: t -*-
;;
-;; Copyright (C) 2013-2019, Vitalie Spinu
+;; Copyright (C) 2013-2022 Free Software Foundation, Inc.
;; Author: Vitalie Spinu
;; URL: https://github.com/polymode/polymode
;;
@@ -201,7 +201,7 @@ initialized. Return the buffer."
(add-hook 'after-change-functions #'polymode-after-change 95 t)
;; FONT LOCK (see poly-lock.el)
- (setq-local font-lock-function 'poly-lock-mode)
+ (setq-local font-lock-function #'poly-lock-mode)
;; Font lock is a globalized minor mode and is thus initialized in
;; `after-change-major-mode-hook' within `run-mode-hooks'. As a result
;; poly-lock won't get installed if polymode is installed as a minor mode or
@@ -328,7 +328,7 @@ Create and initialize the buffer if does not exist yet.")
Return a list of three elements (TYPE BEG END OBJECT) where TYPE
is a symbol representing the type of the span surrounding
POS (head, tail, body). BEG and END are the coordinates of the
-span. OBJECT is a suitable object which is 'responsible' for this
+span. OBJECT is a suitable object which is `responsible' for this
span. This is an object that could be dispatched upon with
`pm-select-buffer'. Should return nil if there is no SUBMODE
specific span around POS. Not to be used in programs directly;
@@ -343,7 +343,7 @@ Host modes usually do not compute spans."
(cl-defmethod pm-get-span ((chunkmode pm-inner-chunkmode) &optional pos)
"Return a list of the form (TYPE POS-START POS-END SELF).
-TYPE can be 'body, 'head or 'tail. SELF is the CHUNKMODE."
+TYPE can be `body', `head' or `tail'. SELF is the CHUNKMODE."
(with-slots (head-matcher tail-matcher head-mode tail-mode) chunkmode
(let ((span (pm--span-at-point head-matcher tail-matcher pos
(eieio-oref chunkmode 'can-overlap))))