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

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

[elpa] externals/objed 74b3595 181/216: Adjust textblock object


From: Stefan Monnier
Subject: [elpa] externals/objed 74b3595 181/216: Adjust textblock object
Date: Tue, 8 Jan 2019 12:29:35 -0500 (EST)

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

    Adjust textblock object
---
 objed-objects.el | 4 +---
 objed.el         | 4 ++--
 2 files changed, 3 insertions(+), 5 deletions(-)

diff --git a/objed-objects.el b/objed-objects.el
index b7d263d..6fbdee6 100644
--- a/objed-objects.el
+++ b/objed-objects.el
@@ -1620,9 +1620,7 @@ Ignores simple structured expressions like words or 
symbols."
             (objed--in-string-p))
     (objed--with-narrow-for-text
      (let ((bounds (objed--get-textblock-bounds)))
-       (when (and bounds
-                  (or (not (eq (car bounds) (point-min)))
-                      (not (eq (cdr bounds) (point-max)))))
+       (when bounds
          (objed-make-object :obounds bounds)))))
   :try-next
   (objed--with-narrow-for-text
diff --git a/objed.el b/objed.el
index d40d886..1e383be 100644
--- a/objed.el
+++ b/objed.el
@@ -514,8 +514,8 @@ update to given object."
            (funcall (cdr binding) name))
           (t
            (let ((current objed--object))
-             ;; object called as command via M-x,
-             ;; objed need to initialize first
+             ;; object called as command via M-x, objed need to
+             ;; initialize first
              (when (not objed--buffer)
                (objed--init name))
              (cond  ((and (eq name current)



reply via email to

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