[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/ssh-deploy 4a2f947 053/173: Fixed bug where missing rem
From: |
Stefan Monnier |
Subject: |
[elpa] externals/ssh-deploy 4a2f947 053/173: Fixed bug where missing remote file used wrong logic |
Date: |
Sat, 20 Oct 2018 10:36:29 -0400 (EDT) |
branch: externals/ssh-deploy
commit 4a2f9472d297f6619d3558427c52ffd805092644
Author: Christian Johansson <address@hidden>
Commit: Christian Johansson <address@hidden>
Fixed bug where missing remote file used wrong logic
---
ssh-deploy.el | 44 +++++++++++++++++++++++++-------------------
1 file changed, 25 insertions(+), 19 deletions(-)
diff --git a/ssh-deploy.el b/ssh-deploy.el
index a045e84..1d39797 100644
--- a/ssh-deploy.el
+++ b/ssh-deploy.el
@@ -4,7 +4,7 @@
;; Maintainer: Christian Johansson <github.com/cjohansson>
;; Created: 5 Jul 2016
;; Modified: 6 Dec 2016
-;; Version: 1.44
+;; Version: 1.45
;; Keywords: tools, convenience
;; URL: https://github.com/cjohansson/emacs-ssh-deploy
@@ -363,25 +363,32 @@
(progn
(async-start
`(lambda()
- (require 'ediff)
- (if (fboundp 'ediff-same-contents)
+ (if (file-exists-p ,remote-path)
(progn
- (if (ediff-same-contents
,revision-path ,remote-path)
- 0
- 1))
- 2))
+ (require 'ediff)
+ (if (fboundp
'ediff-same-contents)
+ (progn
+ (if (ediff-same-contents
,revision-path ,remote-path)
+ 0
+ 1))
+ 2))
+ 3))
(lambda(return-message)
(if (= return-message 0) (message
"Remote file has not changed.")
(if (= return-message 1)
(display-warning "ssh-deploy" "External file has changed, please download or
diff." :warning)
- (if (= return-message 2)
(display-warning "ssh-deploy" "Function ediff-same-contents is missing"
:warning)))))))
+ (if (= return-message 2)
(display-warning "ssh-deploy" "Function ediff-same-contents is missing"
:warning)
+ (if (= return-message 3)
(message "Remote file doesn't exist."))))))))
(progn
- (require 'ediff)
- (if (fboundp 'ediff-same-contents)
+ (if (file-exists-p remote-path)
(progn
- (if (ediff-same-contents
revision-path remote-path)
- (message "Remote file has not
changed.")
- (display-warning "ssh-deploy"
"External file has changed, please download or diff." :warning)))
- (display-warning "ssh-deploy" "Function
ediff-same-contents is missing" :warning)))))
+ (require 'ediff)
+ (if (fboundp 'ediff-same-contents)
+ (progn
+ (if (ediff-same-contents
revision-path remote-path)
+ (message "Remote file has
not changed.")
+ (display-warning
"ssh-deploy" "External file has changed, please download or diff." :warning)))
+ (display-warning "ssh-deploy"
"Function ediff-same-contents is missing" :warning)))
+ (message "Remote file doesn't
exist.")))))
(progn
(if (fboundp 'async-start)
(progn
@@ -398,13 +405,13 @@
0)
1))
2))
- (progn
- (message "Remote file doesn't
exist"))))
+ 3))
(lambda(return-message)
(lambda(return-message)
(if (= return-message 0) (message
"Remote file has not changed, created base revision.")
(if (= return-message 1)
(display-warning "ssh-deploy" "External file has changed, please download or
diff." :warning)
- (if (= return-message 2)
(display-warning "ssh-deploy" "Function ediff-same-contents is missing"
:warning))))))))
+ (if (= return-message 2)
(display-warning "ssh-deploy" "Function ediff-same-contents is missing"
:warning)
+ (if (= return-message 3)
(message "Remote file doesn't exist.")))))))))
(progn
(if (file-exists-p remote-path)
(progn
@@ -417,8 +424,7 @@
(message "Remote file has
not changed, created base revision."))
(display-warning "ssh-deploy"
"External file has changed, please download or diff." :warning)))
(display-warning "ssh-deploy"
"Function ediff-same-contents is missing" :warning)))
- (progn
- (message "Remote file doesn't
exist"))))))))))))))))
+ (message "Remote file doesn't
exist")))))))))))))))
;;;### autoload
(defun ssh-deploy-download-handler ()
- [elpa] externals/ssh-deploy fa368fb 020/173: Made relative path generation as stand-alone function and now checks if ztree and tramp-term is installed before trying to call them., (continued)
- [elpa] externals/ssh-deploy fa368fb 020/173: Made relative path generation as stand-alone function and now checks if ztree and tramp-term is installed before trying to call them., Stefan Monnier, 2018/10/20
- [elpa] externals/ssh-deploy f4ad77d 026/173: Now works asynchrously, moved (revert-buffer) to successful downloads instead of to key-binding., Stefan Monnier, 2018/10/20
- [elpa] externals/ssh-deploy 05ed4c8 009/173: Made changes to comply with MELPA guidelines., Stefan Monnier, 2018/10/20
- [elpa] externals/ssh-deploy 89fb82a 038/173: Fixed bug when downloading via SSH to a local path containing whitespaces, Stefan Monnier, 2018/10/20
- [elpa] externals/ssh-deploy 965c68f 028/173: Centralized asynchronous shell commands., Stefan Monnier, 2018/10/20
- [elpa] externals/ssh-deploy e6e1ad8 039/173: Updated version and modified date, Stefan Monnier, 2018/10/20
- [elpa] externals/ssh-deploy 2257f95 029/173: Fixed upload and downloads of root directories where local root directory name differs from remote root directory name., Stefan Monnier, 2018/10/20
- [elpa] externals/ssh-deploy 560ff1d 037/173: Added TRAMP functions and improved messages., Stefan Monnier, 2018/10/20
- [elpa] externals/ssh-deploy a86091c 032/173: Broken down diff function into multiple functions to easily add new protocols., Stefan Monnier, 2018/10/20
- [elpa] externals/ssh-deploy 1e58dc3 040/173: SSH deployment now works via TRAMP instead of SCP, Stefan Monnier, 2018/10/20
- [elpa] externals/ssh-deploy 4a2f947 053/173: Fixed bug where missing remote file used wrong logic,
Stefan Monnier <=
- [elpa] externals/ssh-deploy 61a16be 047/173: Merged remote, Stefan Monnier, 2018/10/20
- [elpa] externals/ssh-deploy d599659 015/173: Added support for opening remote terminals, uploads/downloads/differences of directories, browsing remote hosts and fixed a bug where paths with special chars were not handled correctly., Stefan Monnier, 2018/10/20
- [elpa] externals/ssh-deploy 1af0208 045/173: Cleaned up code structure and isolated functions, Stefan Monnier, 2018/10/20
- [elpa] externals/ssh-deploy 740c27d 054/173: Fixed message when no base revision exists and remote file equals local file, Stefan Monnier, 2018/10/20
- [elpa] externals/ssh-deploy ac7aff8 052/173: Asynchronous detection of remote changes doesn't use any synchronous action, Stefan Monnier, 2018/10/20
- [elpa] externals/ssh-deploy d4953c7 049/173: Fixed upload/download of root directory with different names, Stefan Monnier, 2018/10/20
- [elpa] externals/ssh-deploy 2d2c380 033/173: Implemented FTP via cURL but haven't tested it yet., Stefan Monnier, 2018/10/20
- [elpa] externals/ssh-deploy f36ffce 059/173: Added MELPA Stable link, Stefan Monnier, 2018/10/20
- [elpa] externals/ssh-deploy 29cf0b2 061/173: Added force handler in documentation, Stefan Monnier, 2018/10/20
- [elpa] externals/ssh-deploy 3ea14de 062/173: Improved README for forced uploads, Stefan Monnier, 2018/10/20