[elpa] externals/objed 7abf5b3 091/216: Fixes #3, switch to remote object with '#'

[Stefan Monnier]

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

    Fixes #3, switch to remote object with '#'
---
 objed.el | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/objed.el b/objed.el
index 9aa8c2c..72f0489 100644
--- a/objed.el
+++ b/objed.el
@@ -886,6 +886,7 @@ Use `objed-define-dispatch' to define a dispatch command.")
 (objed-define-dispatch "<" objed--backward-until)
 (objed-define-dispatch ">" objed--forward-until)
 (objed-define-dispatch "*" objed--mark-all-inside)
+(objed-define-dispatch "#" objed--ace-switch-object)
 
 (defun objed--backward-until (name)
   "Activate part from point backward until object NAME."
@@ -931,6 +932,10 @@ Use `objed-define-dispatch' to define a dispatch command.")
         (let ((n (objed--do-all 'objed--mark-object)))
           (message "Marked %s %ss in %s." n objed--object name))))))
 
+(defun objed--ace-switch-object (name)
+  (let ((objed--object name))
+    (objed-ace)))
+
 
 (defun objed--until (n &optional back)
   "Get object N and move point accordingly.