[elpa] externals/objed 8861388 082/166: Auto switch from sexp object only for interactive state toggle

[Clemens Radermacher]

branch: externals/objed
commit 8861388e3e244ff14bbe082e1ddc7234d022b123
Author: Clemens Radermacher <address@hidden>
Commit: Clemens Radermacher <address@hidden>

    Auto switch from sexp object only for interactive state toggle
---
 objed.el | 12 +++++-------
 1 file changed, 5 insertions(+), 7 deletions(-)

diff --git a/objed.el b/objed.el
index 739f934..d658803 100644
--- a/objed.el
+++ b/objed.el
@@ -1816,13 +1816,7 @@ to an object containing the current one."
           'identifier))))
 
 (defun objed--toggle-state ()
-  "Toggle state of object.
-
-Shrinks to inner objects on repeat if possible."
-  (when (eq objed--object 'sexp)
-    (let ((fallback (objed--sexp-fallback)))
-      (when fallback
-        (objed--switch-to fallback))))
+  "Toggle state of object."
   (objed--reverse))
 
 (defun objed-backward-until-context ()
@@ -1967,6 +1961,10 @@ Default to sexp at point."
 
 Switches between inner and whole object state."
   (interactive)
+  (when (eq objed--object 'sexp)
+    (let ((fallback (objed--sexp-fallback)))
+      (when fallback
+        (objed--switch-to fallback))))
   (let ((boo (eq (point) (objed--beg)))
         (eoo (eq (point) (objed--end))))
     (objed--toggle-state)