[elpa] externals/kubed e73a4ee0a4 55/70: Always display message when done updating resources

[ELPA Syncer]

branch: externals/kubed
commit e73a4ee0a44501c720abc2c8f6ce7ac4a6442391
Author: Eshel Yaron <me@eshelyaron.com>
Commit: Eshel Yaron <me@eshelyaron.com>

    Always display message when done updating resources
    
    * kubed.el (kubed-define-resource): In generated
    'kubed-update-RESOURCEs', emit message in process sentinel regardless
    of optional argument.
---
 kubed.el | 14 ++++++++------
 1 file changed, 8 insertions(+), 6 deletions(-)

diff --git a/kubed.el b/kubed.el
index 0a30778f78..6bddb709f3 100644
--- a/kubed.el
+++ b/kubed.el
@@ -725,9 +725,12 @@ Other keyword arguments that go between PROPERTIES and 
COMMANDS are:
          ,(format "Populate `%S', if not already populated." list-var)
          (unless (or ,list-var (process-live-p ,proc-var)) (,updt-cmd)))
 
-       (defun ,updt-cmd (&optional silent)
+       (defun ,updt-cmd (&optional quiet)
          ,(format "Update `%S'.
-Non-nil optional argument SILENT says to inhibit progress messages."
+
+If optional argument QUIET is non-nil, do not emit a message when
+starting to update.  Display a message when the update is done
+regardless of QUIET."
                   list-var)
          (interactive)
          (when (process-live-p ,proc-var) (delete-process ,proc-var))
@@ -810,14 +813,13 @@ Non-nil optional argument SILENT says to inhibit progress 
messages."
                       (setq ,list-var new
                             ,proc-var nil)
                       (run-hooks ',hook-var)
-                      (unless silent
-                        (message ,(format "Updated Kubernetes %S." 
plrl-var)))))
+                      (message ,(format "Updated Kubernetes %S." plrl-var))))
                    ((string= status "exited abnormally with code 1\n")
                     (with-current-buffer ,err-name
                       (goto-char (point-max))
                       (insert "\n" status))
                     (display-buffer ,err-name))))))
-         (unless silent
+         (unless quiet
            (minibuffer-message ,(format "Updating Kubernetes %S..." 
plrl-var))))
 
        (defun ,affx-fun (,plrl-var)
@@ -932,7 +934,7 @@ Optional argument DEFAULT is the minibuffer default 
argument." resource)
            `((add-hook 'kubed-all-namespaces-mode-hook
                        (lambda ()
                          (setq ,list-var nil)
-                         (,updt-cmd)))))
+                         (,updt-cmd t)))))
 
        (defun ,edt-name (,resource . ,(when namespaced '(&optional k8sns)))
          ,(format "Edit Kubernetes %S %s."