update packages and add valign

lisp/async/async.el

@@ -6,12 +6,12 @@
 ;; Maintainer: Thierry Volpiatto <thievol@posteo.net>
 
 ;; Created: 18 Jun 2012
-;; Package-Version: 20251005.634
-;; Package-Revision: 31cb2fea8f4b
+;; Package-Version: 20260318.1803
+;; Package-Revision: 5faab2891660
 ;; Package-Requires: ((emacs "24.4"))
 
 ;; Keywords: async
-;; X-URL: https://github.com/jwiegley/emacs-async
+;; URL: https://github.com/jwiegley/emacs-async
 
 ;; This program is free software; you can redistribute it and/or modify
 ;; it under the terms of the GNU General Public License as published by
@@ -284,15 +284,13 @@ is used."
           (move-marker async-read-marker (point)))))))
 
 (defun async--receive-sexp (&optional stream)
-  ;; FIXME: Why use `utf-8-auto' instead of `utf-8-unix'?  This is
-  ;; a communication channel over which we have complete control,
-  ;; so we get to choose exactly which encoding and EOL we use, isn't
-  ;; it?
-  ;; UPDATE: We use now `utf-8-emacs-unix' instead of `utf-8-auto' as
-  ;; recommended in bug#165.
+  ;; We use `utf-8-emacs-unix' for the communication channel between
+  ;; parent and child Emacs processes. This encoding can represent any
+  ;; character that Emacs is capable of processing and gives us full
+  ;; control over the EOL format. (See bug#165)
   (let ((sexp (decode-coding-string (base64-decode-string (read stream))
                                     'utf-8-emacs-unix))
-        ;; Parent expects UTF-8 encoded text.
+        ;; Parent expects utf-8-emacs-unix encoded text.
         (coding-system-for-write 'utf-8-emacs-unix))
     (if async-debug
         (message "Received sexp {{{%s}}}" (pp-to-string sexp)))
@@ -324,8 +322,8 @@ is used."
 
 (defun async-batch-invoke ()
   "Called from the child Emacs process' command line."
-  ;; Make sure 'message' and 'prin1' encode stuff in UTF-8, as parent
-  ;; process expects.
+  ;; Make sure 'message' and 'prin1' encode stuff in utf-8-emacs-unix,
+  ;; as parent process expects.
   (let ((coding-system-for-write 'utf-8-emacs-unix)
         (args-left command-line-args-left))
     (setq async-in-child-emacs t
@@ -488,7 +486,7 @@ used globally.  Should be found with `locate-library'.")
                            (with-temp-buffer
                              (async--insert-sexp (list 'quote sexp))
                              (buffer-string))
-                           "<none>")))))
+                         "<none>")))))
 
 ;;;###autoload
 (defun async-start (start-func &optional finish-func)
@@ -560,7 +558,7 @@ passed to FINISH-FUNC).  Call `async-get' on such a future always
 returns nil.  It can still be useful, however, as an argument to
 `async-ready' or `async-wait'."
   (let ((sexp start-func)
-        ;; Subordinate Emacs will send text encoded in UTF-8.
+        ;; Subordinate Emacs will send text encoded in utf-8-emacs-unix.
         (coding-system-for-read 'utf-8-emacs-unix))
     (setq async--procvar
           (apply 'async-start-process