branch: elpa/el-job
commit 08cd1b0fadd2fa8e2b671a8a771c2c961a373bb7
Author: Martin Edström <meedstro...@gmail.com>
Commit: Martin Edström <meedstro...@gmail.com>
Fix el-job-show-info
---
el-job.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/el-job.el b/el-job.el
index 2d82606d63..4fc2f3cffc 100644
--- a/el-job.el
+++ b/el-job.el
@@ -664,9 +664,10 @@ Use \\[el-job-cycle-debug-level] and they are not killed
from then on."
(when-let* ((id (intern (completing-read "Get info on job: " el-jobs)))
(job (gethash id el-jobs)))
(set-buffer (get-buffer-create "*el-job debug info*" t))
- (erase-buffer)
(so-long-mode)
- (cl-prin1 job (current-buffer))
+ (let ((inhibit-read-only t))
+ (erase-buffer)
+ (prin1 job (current-buffer)))
(switch-to-buffer (current-buffer))))
(defun el-job-kill-all ()
