diff options
author | Erik Martin-Dorel <erik@martin-dorel.org> | 2018-08-23 00:01:12 +0200 |
---|---|---|
committer | Erik Martin-Dorel <erik@martin-dorel.org> | 2018-08-23 01:23:31 +0200 |
commit | 86d22428959a0f5aecef270e0f4dd7d4b5712fc3 (patch) | |
tree | 676fe59b7644498172f96b6da605745a6bf71a13 /lib/span.el | |
parent | 3ba86af3271111cb056676c631b7caa6897e06f1 (diff) |
Fix most doc issues raised by (checkdoc)
Diffstat (limited to 'lib/span.el')
-rw-r--r-- | lib/span.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lib/span.el b/lib/span.el index 2252d605..e7e3d68b 100644 --- a/lib/span.el +++ b/lib/span.el @@ -39,7 +39,7 @@ (defalias 'span-buffer 'overlay-buffer) (defun span-p (ol) - "Check if an overlay belongs to PG." + "Check if an overlay OL belongs to PG." (overlay-get ol 'pg-span)) (defun span-read-only-hook (overlay after start end &optional len) @@ -119,7 +119,7 @@ (defun span-mapcar-spans-inorder (fn start end prop) "Map function FN over spans between START and END with property PROP." - (mapcar fn + (mapcar fn (sort (spans-at-region-prop start end prop) 'span-lt))) @@ -165,7 +165,7 @@ A span is before PT if it begins before the character before PT." (defun span-string (span) (with-current-buffer (overlay-buffer span) - (buffer-substring-no-properties + (buffer-substring-no-properties (overlay-start span) (overlay-end span)))) (defun set-span-properties (span plist) @@ -212,7 +212,8 @@ A span is before PT if it begins before the character before PT." (span-mapc-spans 'span-delete start end prop)) (defun span-property-safe (span name) - "Like span-property, but return nil if SPAN is nil." + "Get the property of span SPAN with property name NAME. +Like ‘span-property’, but return nil if SPAN is nil." (and span (span-property span name))) (defun span-set-start (span value) |