Re: silence append-to-file?

[Emanuel Berg]

Gregory Heytings wrote:

>> Alternatively, is there a better function to use for this?
>
> (defun append-to-file-quiet (start end filename)
>   "Like `append-to-file', but do not log a message in *Messages*"
>   (let ((message-log-max nil))
>     (append-to-file start end filename)))

Do this for how to improve the docstring ...

(require 'checkdoc)

(setq checkdoc-permit-comma-termination-flag t)

(defun check-package-style ()
  (interactive)
  (let ((msg "Style check..."))
    (message msg)
    (checkdoc-current-buffer t) ; TAKE-NOTES
    (message "%sdone" msg) ))
(defalias 'check-style #'check-package-style)

-- 
underground experts united
https://dataswamp.org/~incal