From a72a86e7bc16efe5d1e3456d56d14856df723d01 Mon Sep 17 00:00:00 2001 From: Andreas Gerler Date: Mon, 21 Jan 2019 15:04:02 +0100 Subject: [PATCH] Update async. Signed-off-by: Andreas Gerler --- bba.org | 2 +- .../async-autoloads.el | 0 .../async-bytecomp.el | 0 .../{async-20180527.1730 => async-20181224.454}/async-pkg.el | 2 +- elpa/{async-20180527.1730 => async-20181224.454}/async.el | 0 .../dired-async.el | 5 ++++- .../smtpmail-async.el | 0 7 files changed, 6 insertions(+), 3 deletions(-) rename elpa/{async-20180527.1730 => async-20181224.454}/async-autoloads.el (100%) rename elpa/{async-20180527.1730 => async-20181224.454}/async-bytecomp.el (100%) rename elpa/{async-20180527.1730 => async-20181224.454}/async-pkg.el (55%) rename elpa/{async-20180527.1730 => async-20181224.454}/async.el (100%) rename elpa/{async-20180527.1730 => async-20181224.454}/dired-async.el (98%) rename elpa/{async-20180527.1730 => async-20181224.454}/smtpmail-async.el (100%) diff --git a/bba.org b/bba.org index a3f35182..cf79b69f 100644 --- a/bba.org +++ b/bba.org @@ -245,7 +245,7 @@ Keep track of your important stuff! #+BEGIN_SRC emacs-lisp :tangle yes (if (>= emacs-major-version 24) (progn - (add-to-list 'load-path "~/.emacs.d/elpa/async-20180527.1730") + (add-to-list 'load-path "~/.emacs.d/elpa/async-20181224.454") (require 'async) ) ) diff --git a/elpa/async-20180527.1730/async-autoloads.el b/elpa/async-20181224.454/async-autoloads.el similarity index 100% rename from elpa/async-20180527.1730/async-autoloads.el rename to elpa/async-20181224.454/async-autoloads.el diff --git a/elpa/async-20180527.1730/async-bytecomp.el b/elpa/async-20181224.454/async-bytecomp.el similarity index 100% rename from elpa/async-20180527.1730/async-bytecomp.el rename to elpa/async-20181224.454/async-bytecomp.el diff --git a/elpa/async-20180527.1730/async-pkg.el b/elpa/async-20181224.454/async-pkg.el similarity index 55% rename from elpa/async-20180527.1730/async-pkg.el rename to elpa/async-20181224.454/async-pkg.el index 507e0666..6e68ac09 100644 --- a/elpa/async-20180527.1730/async-pkg.el +++ b/elpa/async-20181224.454/async-pkg.el @@ -1,4 +1,4 @@ -(define-package "async" "20180527.1730" "Asynchronous processing in Emacs" 'nil :keywords +(define-package "async" "20181224.454" "Asynchronous processing in Emacs" 'nil :keywords '("async") :url "https://github.com/jwiegley/emacs-async") ;; Local Variables: diff --git a/elpa/async-20180527.1730/async.el b/elpa/async-20181224.454/async.el similarity index 100% rename from elpa/async-20180527.1730/async.el rename to elpa/async-20181224.454/async.el diff --git a/elpa/async-20180527.1730/dired-async.el b/elpa/async-20181224.454/dired-async.el similarity index 98% rename from elpa/async-20180527.1730/dired-async.el rename to elpa/async-20181224.454/dired-async.el index bc406b39..677c1691 100644 --- a/elpa/async-20180527.1730/dired-async.el +++ b/elpa/async-20181224.454/dired-async.el @@ -162,7 +162,10 @@ Should take same args as `message'." (when dired-buffers (cl-loop for (_f . b) in dired-buffers when (buffer-live-p b) - do (with-current-buffer b (revert-buffer nil t)))) + do (with-current-buffer b + (when (and (not (file-remote-p default-directory nil t)) + (file-exists-p default-directory)) + (revert-buffer nil t))))) ;; Finally send the success message. (funcall dired-async-message-function "Asynchronous %s of %s on %s file%s done" diff --git a/elpa/async-20180527.1730/smtpmail-async.el b/elpa/async-20181224.454/smtpmail-async.el similarity index 100% rename from elpa/async-20180527.1730/smtpmail-async.el rename to elpa/async-20181224.454/smtpmail-async.el -- 2.47.3