Always update status if search process ends emacsorphanage#393

Azkae · Nov 5, 2023 · 8d51c7a · 8d51c7a
1 parent 501af5c
commit 8d51c7a
Showing 1 changed file with 8 additions and 5 deletions.
diff --git a/helm-ag.el b/helm-ag.el
@@ -1059,10 +1059,7 @@ Continue searching the parent directory? "))
    (helm-ag--remove-carrige-returns)
    (when helm-ag--buffer-search
      (helm-ag--abbreviate-file-name))
-   (helm-ag--propertize-candidates input)
-   (when helm-ag-show-status-function
-     (funcall helm-ag-show-status-function)
-     (force-mode-line-update))))
+   (helm-ag--propertize-candidates input)))
 
 (defun helm-ag--construct-extension-options ()
   "Not documented."
@@ -1139,7 +1136,13 @@ Continue searching the parent directory? "))
              (helm-process-deferred-sentinel-hook
               process event (helm-default-directory))
              (when (string= event "finished\n")
-               (helm-ag--do-ag-propertize helm-input)))))))))
+               (helm-ag--do-ag-propertize helm-input))
+             ;; Always update status to inform user if process ends
+             (when (and helm-ag-show-status-function
+                        (not (process-live-p process)))
+               (with-helm-window
+                 (funcall helm-ag-show-status-function)
+                 (force-mode-line-update))))))))))
 
 (defconst helm-do-ag--help-message
   "\n* Helm Do Ag\n