emacs-elpa-diffs
[Top][All Lists]
Advanced

[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."



reply via email to

[Prev in Thread] Current Thread [Next in Thread]