[elpa] externals/objed cd7c738 053/216: Undo C-h remapping

[Stefan Monnier]

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

    Undo C-h remapping
---
 objed.el | 14 --------------
 1 file changed, 14 deletions(-)

diff --git a/objed.el b/objed.el
index 99ca427..547087c 100644
--- a/objed.el
+++ b/objed.el
@@ -645,7 +645,6 @@ object as an argument."
     (define-key map (kbd "C-g") 'objed-quit)
     (define-key map "g" 'objed-quit)
     (define-key map (kbd "?") 'objed-show-top-level)
-    (define-key map (kbd "C-h") 'objed-which-key-C-h-dispatch)
     ;; TODO: support repeated invokation
     (define-key map (kbd "C-u") 'universal-argument)
     (define-key map (kbd "C-SPC") 'set-mark-command)
@@ -1191,19 +1190,6 @@ non-nil which is the case when called interactively."
     (when interactive
       (objed--describe-bindings objed-map))))
 
-(defun objed-which-key-C-h-dispatch ()
-  "If which-key popup is howing act as paging prefix.
-
-Otherwise act as ususal help prefix."
-  (interactive)
-  (if (which-key--popup-showing-p)
-      (which-key-C-h-dispatch)
-    (objed--exit-objed)
-    (setq unread-command-events
-          (append unread-command-events
-                  (listify-key-sequence (kbd "C-h"))))))
-
-
 (defun objed-describe-dispatch-bindings ()
   "Describe `objed-dispatch-map' bindings."
   (interactive)