aboutsummaryrefslogtreecommitdiffstats
path: root/elisp/cmk.el
diff options
context:
space:
mode:
authorOscar Najera <hi@oscarnajera.com>2025-04-25 12:17:51 +0200
committerOscar Najera <hi@oscarnajera.com>2025-04-25 12:17:51 +0200
commit29e365117119c3ede198346ffa7efb6738ee8bbc (patch)
tree0e5e0b636f5cafe0e20e70287b64e275c0c6d301 /elisp/cmk.el
parentf770352b295087ec7229d52a34f2981cf2dd6c34 (diff)
downloaddotfiles-29e365117119c3ede198346ffa7efb6738ee8bbc.tar.gz
dotfiles-29e365117119c3ede198346ffa7efb6738ee8bbc.tar.bz2
dotfiles-29e365117119c3ede198346ffa7efb6738ee8bbc.zip
cmk longer wait for response
Diffstat (limited to 'elisp/cmk.el')
-rw-r--r--elisp/cmk.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/elisp/cmk.el b/elisp/cmk.el
index f70a9da..8d754cd 100644
--- a/elisp/cmk.el
+++ b/elisp/cmk.el
@@ -105,6 +105,7 @@ Default is \"%Y-%m-%d %H:%M\"."
"Livestatus query in buffer.")
(defun cmk-timestamp-eldoc-documentation ()
+ "Translates a number being unix timestamp a readable date."
(when-let ((number (thing-at-point 'number)))
(format-time-string "%Y-%m-%d %H:%M" (seconds-to-time number))))
@@ -165,7 +166,7 @@ Default is \"%Y-%m-%d %H:%M\"."
(defun cmk-livestatus->json (query)
"Send QUERY to livestatus then parse the result assuming is JSON."
(let ((cmks (cmk-livestatus-query query)))
- (accept-process-output cmks 0.1)
+ (accept-process-output cmks 0.5)
(with-current-buffer (process-buffer cmks)
(goto-char (point-min))
(json-parse-buffer :array-type 'list))))