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

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/objed 101fd9f 179/216: Improve org section object


From: Stefan Monnier
Subject: [elpa] externals/objed 101fd9f 179/216: Improve org section object
Date: Tue, 8 Jan 2019 12:29:35 -0500 (EST)

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

    Improve org section object
---
 objed-objects.el | 13 ++++++++-----
 1 file changed, 8 insertions(+), 5 deletions(-)

diff --git a/objed-objects.el b/objed-objects.el
index 84d9b48..b7d263d 100644
--- a/objed-objects.el
+++ b/objed-objects.el
@@ -2191,12 +2191,15 @@ non-nil the indentation block can contain empty lines."
   :atp
   (org-at-heading-p)
   :get-obj
-  (objed-make-object
-   :obounds (when (ignore-errors (org-back-to-heading) t)
-              (cons (point)
-                    (progn (outline-next-visible-heading 1)
+  (when (ignore-errors (org-back-to-heading) t)
+    (objed-make-object
+     :beg (point)
+     :ibeg (line-end-position)
+     :end (progn (outline-next-visible-heading 1)
                            (or (eobp) (move-end-of-line 0))
-                           (point)))))
+                           (point))
+     :iend (progn (skip-chars-backward " \t\r\n")
+                  (point))))
   :try-next
   (outline-next-visible-heading 1)
   :try-prev



reply via email to

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