[elpa] externals/objed a090ada 056/216: Stop object search at buffer boundaries earlier

[Stefan Monnier]

branch: externals/objed
commit a090ada191f3eaba7bab8b60e1cc1dc90d843f9b
Author: Clemera <address@hidden>
Commit: Clemera <address@hidden>

    Stop object search at buffer boundaries earlier
---
 objed-objects.el | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/objed-objects.el b/objed-objects.el
index 4b32c0a..b26e311 100644
--- a/objed-objects.el
+++ b/objed-objects.el
@@ -592,8 +592,9 @@ from end of object FROM."
         (if (integer-or-marker-p obj)
             (goto-char obj)
           (goto-char (objed--max obj))))
-      (objed--object :try-next)
-      (objed--get))))
+      (unless (eobp)
+        (objed--object :try-next)
+        (objed--get)))))
 
 (defun objed--get-prev (&optional from)
   "Get previous object from position or object.
@@ -606,8 +607,9 @@ from beginning of object FROM."
         (if (integer-or-marker-p obj)
             (goto-char obj)
           (goto-char (objed--min obj))))
-      (objed--object :try-prev)
-      (objed--get t))))
+      (unless (bobp)
+        (objed--object :try-prev)
+        (objed--get t)))))
 
 ;; * Helpers to work with object format