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

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

[elpa] externals/ssh-deploy b1713b7 129/173: Added all handlers to new m


From: Stefan Monnier
Subject: [elpa] externals/ssh-deploy b1713b7 129/173: Added all handlers to new menu
Date: Sat, 20 Oct 2018 10:36:43 -0400 (EDT)

branch: externals/ssh-deploy
commit b1713b7e86515dc2c74a1994bf5c509e03a38b11
Author: Christian Johansson <address@hidden>
Commit: Christian Johansson <address@hidden>

    Added all handlers to new menu
---
 ssh-deploy.el | 48 ++++++++++++++++++++++++++++++++++++++++++++++--
 1 file changed, 46 insertions(+), 2 deletions(-)

diff --git a/ssh-deploy.el b/ssh-deploy.el
index 48761b9..67734a3 100644
--- a/ssh-deploy.el
+++ b/ssh-deploy.el
@@ -1108,12 +1108,56 @@
   'tools)
 (define-key
   global-map
-  [menu-bar sshdeploy nl]
+  [menu-bar sshdeploy ul]
   '("Upload" . ssh-deploy-upload-handler))
 (define-key
   global-map
-  [menu-bar sshdeploy pl]
+  [menu-bar sshdeploy dl]
   '("Download" . ssh-deploy-download-handler))
+(define-key
+  global-map
+  [menu-bar sshdeploy df]
+  '("Difference" . ssh-deploy-diff-handler))
+(define-key
+  global-map
+  [menu-bar sshdeploy rn]
+  '("Rename" . ssh-deploy-rename-handler))
+(define-key
+  global-map
+  [menu-bar sshdeploy rc]
+  '("Detect Remote Changes" . ssh-deploy-remote-changes-handler))
+(define-key
+  global-map
+  [menu-bar sshdeploy br]
+  '("Browse" . ssh-deploy-browse-remote-handler))
+(define-key
+  global-map
+  [menu-bar sshdeploy bb]
+  '("Browse Base" . ssh-deploy-browse-remote-base-handler))
+(define-key
+  global-map
+  [menu-bar sshdeploy es]
+  '("Eshell" . ssh-deploy-remote-terminal-eshell-handler))
+(define-key
+  global-map
+  [menu-bar sshdeploy eb]
+  '("Eshell Base" . ssh-deploy-remote-terminal-eshell-base-handler))
+(define-key
+  global-map
+  [menu-bar sshdeploy ss]
+  '("Shell" . ssh-deploy-remote-terminal-shell-handler))
+(define-key
+  global-map
+  [menu-bar sshdeploy sb]
+  '("Shell Base" . ssh-deploy-remote-terminal-shell-base-handler))
+(define-key
+  global-map
+  [menu-bar sshdeploy mq]
+  '("MySQL" . ssh-deploy-remote-sql-mysql-handler))
+(define-key
+  global-map
+  [menu-bar sshdeploy pq]
+  '("PostgreSQL" . ssh-deploy-remote-sql-postgres-handler))
 
 
 (provide 'ssh-deploy)



reply via email to

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