[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/ssh-deploy fbc6e85 025/133: Created predefined hydra
From: |
Stefan Monnier |
Subject: |
[elpa] externals/ssh-deploy fbc6e85 025/133: Created predefined hydra |
Date: |
Sat, 27 Mar 2021 14:48:36 -0400 (EDT) |
branch: externals/ssh-deploy
commit fbc6e85ad69b0647bc89a39840d8c749e731c332
Author: Christian Johansson <christian@cvj.se>
Commit: Christian Johansson <christian@cvj.se>
Created predefined hydra
---
README.md | 34 ++----------------------------
ssh-deploy.el | 66 ++++++++++++++++++++++++++++++-----------------------------
2 files changed, 36 insertions(+), 64 deletions(-)
diff --git a/README.md b/README.md
index 69853a4..b1efdb7 100644
--- a/README.md
+++ b/README.md
@@ -181,42 +181,12 @@ By combining a `~/.authinfo.gpg` setup and a `public-key`
setup you should be ab
(use-package ssh-deploy
:ensure t
:demand
- :bind (("C-c C-z" . hydra-ssh-deploy/body))
+ :bind (("C-c C-z" . ssh-deploy-hydra/body))
:hook ((after-save . ssh-deploy-after-save)
(find-file . ssh-deploy-find-file))
:config
(ssh-deploy-line-mode) ;; If you want mode-line feature
-
- (defhydra hydra-ssh-deploy (:color red :hint nil)
- "
- _u_: Upload _f_: Force Upload
- _d_: Download
- _D_: Delete
- _x_: Difference
- _t_: Eshell Base Terminal _T_: Eshell Relative Terminal
- _h_: Shell Base Terminal _H_: Shell Relative Terminal
- _e_: Detect Remote Changes
- _R_: Rename
- _b_: Browse Base _B_: Browse Relative
- _o_: Open current file on remote _m_: Open sql-mysql on remote
- _s_: Run deploy script
- "
- ("f" ssh-deploy-upload-handler-forced)
- ("u" ssh-deploy-upload-handler)
- ("d" ssh-deploy-download-handler)
- ("D" ssh-deploy-delete-handler)
- ("x" ssh-deploy-diff-handler)
- ("t" ssh-deploy-remote-terminal-eshell-base-handler)
- ("T" ssh-deploy-remote-terminal-eshell-handler)
- ("h" ssh-deploy-remote-terminal-shell-base-handler)
- ("H" ssh-deploy-remote-terminal-shell-handler)
- ("e" ssh-deploy-remote-changes-handler)
- ("R" ssh-deploy-rename-handler)
- ("b" ssh-deploy-browse-remote-base-handler)
- ("B" ssh-deploy-browse-remote-handler)
- ("o" ssh-deploy-open-remote-file-handler)
- ("m" ssh-deploy-remote-sql-mysql-handler)
- ("s" ssh-deploy-run-deploy-script-handler)))
+ )
```
(1) You can remove the `(add-to-list)` and `(require)` lines if you installed
via `ELPA` or `MELPA` repository.
diff --git a/ssh-deploy.el b/ssh-deploy.el
index 2f6aa14..a8a8518 100644
--- a/ssh-deploy.el
+++ b/ssh-deploy.el
@@ -83,42 +83,12 @@
;; (use-package ssh-deploy
;; :ensure t
;; :demand
-;; :bind (("C-c C-z" . hydra-ssh-deploy/body))
+;; :bind (("C-c C-z" . ssh-deploy-hydra/body))
;; :hook ((after-save . ssh-deploy-after-save)
;; (find-file . ssh-deploy-find-file))
;; :config
;; (ssh-deploy-line-mode) ;; If you want mode-line feature
-;;
-;; (defhydra hydra-ssh-deploy (:color red :hint nil)
-;; "
-;; _u_: Upload _f_: Force Upload
-;; _d_: Download
-;; _D_: Delete
-;; _x_: Difference
-;; _t_: Eshell Base Terminal _T_: Eshell Relative Terminal
-;; _h_: Shell Base Terminal _H_: Shell Relative Terminal
-;; _e_: Detect Remote Changes
-;; _R_: Rename
-;; _b_: Browse Base _B_: Browse Relative
-;; _o_: Open current file on remote _m_: Open sql-mysql on remote
-;; _s_: Run deploy script
-;; "
-;; ("f" ssh-deploy-upload-handler-forced)
-;; ("u" ssh-deploy-upload-handler)
-;; ("d" ssh-deploy-download-handler)
-;; ("D" ssh-deploy-delete-handler)
-;; ("x" ssh-deploy-diff-handler)
-;; ("t" ssh-deploy-remote-terminal-eshell-base-handler)
-;; ("T" ssh-deploy-remote-terminal-eshell-handler)
-;; ("h" ssh-deploy-remote-terminal-shell-base-handler)
-;; ("H" ssh-deploy-remote-terminal-shell-handler)
-;; ("e" ssh-deploy-remote-changes-handler)
-;; ("R" ssh-deploy-rename-handler)
-;; ("b" ssh-deploy-browse-remote-base-handler)
-;; ("B" ssh-deploy-browse-remote-handler)
-;; ("o" ssh-deploy-open-remote-file-handler)
-;; ("m" ssh-deploy-remote-sql-mysql-handler)
-;; ("s" ssh-deploy-run-deploy-script-handler)))
+;; )
;;
;;
;; Here is an example for SSH deployment,
/Users/Chris/Web/Site1/.dir-locals.el:
@@ -1414,6 +1384,38 @@
(defun ssh-deploy-add-find-file-hook () "Add the `find-file-hook'."
(when (fboundp 'ssh-deploy-find-file) (add-hook 'find-file-hook
'ssh-deploy-find-file)))
+(when (fboundp 'defhydra)
+ (defhydra ssh-deploy-hydra (:color red :hint nil)
+ "
+ _u_: Upload _f_: Force Upload
+ _d_: Download
+ _D_: Delete
+ _x_: Difference
+ _t_: Eshell Base Terminal _T_: Eshell Relative Terminal
+ _h_: Shell Base Terminal _H_: Shell Relative Terminal
+ _e_: Detect Remote Changes
+ _R_: Rename
+ _b_: Browse Base _B_: Browse Relative
+ _o_: Open current file on remote _m_: Open sql-mysql on remote
+ _s_: Run deploy script
+ "
+ ("f" ssh-deploy-upload-handler-forced)
+ ("u" ssh-deploy-upload-handler)
+ ("d" ssh-deploy-download-handler)
+ ("D" ssh-deploy-delete-handler)
+ ("x" ssh-deploy-diff-handler)
+ ("t" ssh-deploy-remote-terminal-eshell-base-handler)
+ ("T" ssh-deploy-remote-terminal-eshell-handler)
+ ("h" ssh-deploy-remote-terminal-shell-base-handler)
+ ("H" ssh-deploy-remote-terminal-shell-handler)
+ ("e" ssh-deploy-remote-changes-handler)
+ ("R" ssh-deploy-rename-handler)
+ ("b" ssh-deploy-browse-remote-base-handler)
+ ("B" ssh-deploy-browse-remote-handler)
+ ("o" ssh-deploy-open-remote-file-handler)
+ ("m" ssh-deploy-remote-sql-mysql-handler)
+ ("s" ssh-deploy-run-deploy-script-handler)))
+
(provide 'ssh-deploy)
;;; ssh-deploy.el ends here
- [elpa] externals/ssh-deploy ad12e19 008/133: Run deployment script working again after lexical-binding, (continued)
- [elpa] externals/ssh-deploy ad12e19 008/133: Run deployment script working again after lexical-binding, Stefan Monnier, 2021/03/27
- [elpa] externals/ssh-deploy cb792e8 002/133: Added ELPA to description and changed http references to https, Stefan Monnier, 2021/03/27
- [elpa] externals/ssh-deploy 71796c3 006/133: Optimization for menu-code completed, Stefan Monnier, 2021/03/27
- [elpa] externals/ssh-deploy 6fbc09f 010/133: Various changes relating to changing optional boolean argument to, Stefan Monnier, 2021/03/27
- [elpa] externals/ssh-deploy b93b944 009/133: Updated README for optional threading and mode-line, Stefan Monnier, 2021/03/27
- [elpa] externals/ssh-deploy d934ef8 017/133: More work on optional booleans to integers, Stefan Monnier, 2021/03/27
- [elpa] externals/ssh-deploy edee8df 019/133: Improved documentation, Stefan Monnier, 2021/03/27
- [elpa] externals/ssh-deploy 4073f79 014/133: Updated documentation to suggest ~/.authinfo.gpg usage, Stefan Monnier, 2021/03/27
- [elpa] externals/ssh-deploy 2048399 021/133: Passing async-with-threads to directory diff, Stefan Monnier, 2021/03/27
- [elpa] externals/ssh-deploy 54ec0d2 023/133: Updated mode-line logic for deletions, Stefan Monnier, 2021/03/27
- [elpa] externals/ssh-deploy fbc6e85 025/133: Created predefined hydra,
Stefan Monnier <=
- [elpa] externals/ssh-deploy 947a3c7 024/133: Improved usability with pre-defined hooks, Stefan Monnier, 2021/03/27
- [elpa] externals/ssh-deploy 20ce7f2 026/133: Created a pred-fined prefix map and hydra map, Stefan Monnier, 2021/03/27
- [elpa] externals/ssh-deploy a12e59f 027/133: Updated comments, Stefan Monnier, 2021/03/27
- [elpa] externals/ssh-deploy c1f8837 029/133: Updated documentation with pre-defined hydra and pre-fix map, Stefan Monnier, 2021/03/27
- [elpa] externals/ssh-deploy d548011 036/133: Fixed bug with constant definition, Stefan Monnier, 2021/03/27
- [elpa] externals/ssh-deploy d853e2f 040/133: Fixed issue with passing local variables to diff-mode, Stefan Monnier, 2021/03/27
- [elpa] externals/ssh-deploy 98c00bb 042/133: Fixed bug with synchronous forced uploads, Stefan Monnier, 2021/03/27
- [elpa] externals/ssh-deploy 103588b 050/133: Running custom script asynchronously loads ssh-deploy library, Stefan Monnier, 2021/03/27
- [elpa] externals/ssh-deploy 2b3a531 012/133: Updated date, Stefan Monnier, 2021/03/27
- [elpa] externals/ssh-deploy d7a42fe 015/133: Replaced (concat) with (expand-file-name), Stefan Monnier, 2021/03/27