[elpa] externals/poke 46d106a707 40/76: poke.el: remove some non-needed functions

[ELPA Syncer]

branch: externals/poke
commit 46d106a707d71e990cf9a038501ba31bdef589e7
Author: Jose E. Marchesi <jose.marchesi@oracle.com>
Commit: Jose E. Marchesi <jose.marchesi@oracle.com>

    poke.el: remove some non-needed functions
---
 poke.el | 21 +++------------------
 1 file changed, 3 insertions(+), 18 deletions(-)

diff --git a/poke.el b/poke.el
index 4ff75b1b40..6a303be14a 100644
--- a/poke.el
+++ b/poke.el
@@ -745,27 +745,12 @@ fun plet_elval = (string s) void:
 
 (defvar poke-repl-mode-map
   (let ((map (make-sparse-keymap)))
-    (define-key map (kbd "\C-ci") 'poke-repl-cmd-goto-ios)
-    (define-key map (kbd "\C-cc") 'poke-repl-cmd-goto-code)
-    (define-key map (kbd "\C-cs") 'poke-repl-cmd-goto-settings)
+    (define-key map (kbd "\C-ci") 'poke-ios)
+    (define-key map (kbd "\C-cc") 'poke-code)
+    (define-key map (kbd "\C-cs") 'poke-settings)
     map)
   "Local keymap for `poke-repl-mode' buffers.")
 
-(defun poke-repl-cmd-goto-ios ()
-  (interactive)
-  (poke-ios)
-  (switch-to-buffer-other-window "*poke-ios*"))
-
-(defun poke-repl-cmd-goto-code ()
-  (interactive)
-  (poke-code)
-  (switch-to-buffer-other-window "*poke-code*"))
-
-(defun poke-repl-cmd-goto-settings ()
-  (interactive)
-  (poke-settings)
-  (switch-to-buffer-other-window "*poke-settings*"))
-
 (define-derived-mode poke-repl-mode comint-mode "poke"
   "Major mode for the poke repl.
 \\<poke-repl-mode-map>