[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 6371313 1/3: Make docstrings consistent with function
From: |
Justin Burkett |
Subject: |
[elpa] master 6371313 1/3: Make docstrings consistent with function |
Date: |
Sat, 20 May 2017 15:53:21 -0400 (EDT) |
branch: master
commit 6371313190948fc23972b1157efb747a47a8e3a5
Author: Justin Burkett <address@hidden>
Commit: Justin Burkett <address@hidden>
Make docstrings consistent with function
* vdiff.el (vdiff--hunk-at-point-p): Update docstring return overlay
(vdiff--fold-at-point-p): Update docstring return overlay
---
vdiff.el | 14 ++++++++++----
1 file changed, 10 insertions(+), 4 deletions(-)
diff --git a/vdiff.el b/vdiff.el
index b302f86..d482d03 100644
--- a/vdiff.el
+++ b/vdiff.el
@@ -373,18 +373,24 @@ point."
(throw 'yes ovr))))))
(defun vdiff--hunk-at-point-p ()
- "Return first vdiff hunk overlay found at point."
+ "Non-nil if point is in hunk overlay.
+
+Returns overlay."
(let ((ovr (vdiff--overlay-at-pos)))
(and (overlayp ovr)
(overlay-get ovr 'vdiff-type)
- (not (eq (overlay-get ovr 'vdiff-type) 'fold)))))
+ (not (eq (overlay-get ovr 'vdiff-type) 'fold))
+ ovr)))
(defun vdiff--fold-at-point-p ()
- "Return first vdiff fold overlay found at point."
+ "Non-nil if point is in fold overlay.
+
+Returns overlay."
(let ((ovr (vdiff--overlay-at-pos)))
(and (overlayp ovr)
(overlay-get ovr 'vdiff-type)
- (eq (overlay-get ovr 'vdiff-type) 'fold))))
+ (eq (overlay-get ovr 'vdiff-type) 'fold)
+ ovr)))
(defun vdiff--overlays-in-region (beg end)
"Return any vdiff overlays found within BEG and END."