Disable log timestamps.
This commit is contained in:
parent
9db4966aab
commit
24e9433f84
|
@ -1,21 +1,21 @@
|
||||||
;;; misc.el --- Basic things that do not fit any other category. -*- lexical-binding: t; -*-
|
;;; misc.el --- Basic things that do not fit any other category. -*- lexical-binding: t; -*-
|
||||||
|
|
||||||
;; Time-stamp: <2020-01-03T03:50:12+0100>
|
;; Time-stamp: <2020-01-04T12:11:41+0100>
|
||||||
|
|
||||||
;;; Commentary:
|
;;; Commentary:
|
||||||
|
|
||||||
;;; Code:
|
;;; Code:
|
||||||
|
|
||||||
(use-package emacs
|
;; (use-package emacs
|
||||||
:ensure nil
|
;; :ensure nil
|
||||||
|
|
||||||
:config
|
;; :config
|
||||||
(defun my/message-with-timestamp (args)
|
;; (defun my/message-with-timestamp (args)
|
||||||
"Prepend current timestamp to a `message' output."
|
;; "Prepend current timestamp to a `message' output."
|
||||||
(push (concat (format-time-string "[%FT%T] ") (car args)) (cdr args)))
|
;; (push (concat (format-time-string "[%FT%T] ") (car args)) (cdr args)))
|
||||||
|
|
||||||
(advice-add 'message :filter-args 'my/message-with-timestamp)
|
;; (advice-add 'message :filter-args 'my/message-with-timestamp)
|
||||||
)
|
;; )
|
||||||
|
|
||||||
(provide 'basics/misc)
|
(provide 'basics/misc)
|
||||||
;;; misc.el ends here
|
;;; misc.el ends here
|
||||||
|
|
Loading…
Reference in New Issue
Block a user