Function: erc-logging-enabled

erc-logging-enabled is an autoloaded and byte-compiled function defined in erc-log.el.gz.

Signature

(erc-logging-enabled &optional BUFFER)

Documentation

Return non-nil if logging is enabled for BUFFER.

If BUFFER is nil, the value of current-buffer is used. Logging is enabled if erc-log-channels-directory is non-nil, the directory is writable (it will be created as necessary) and erc-enable-logging returns a non-nil value.

Source Code

;; Defined in /usr/src/emacs/lisp/erc/erc-log.el.gz
;;;###autoload
(defun erc-logging-enabled (&optional buffer)
  "Return non-nil if logging is enabled for BUFFER.
If BUFFER is nil, the value of `current-buffer' is used.
Logging is enabled if `erc-log-channels-directory' is non-nil, the directory
is writable (it will be created as necessary) and
`erc-enable-logging' returns a non-nil value."
  (or buffer (setq buffer (current-buffer)))
  (and erc-log-channels-directory
       (not erc-log--save-in-progress-p)
       (not (erc--memq-msg-prop 'erc--skip 'log))
       (or (functionp erc-log-channels-directory)
           (if erc-log--check-writable-nocreate-p
               (file-writable-p erc-log-channels-directory)
             (erc-directory-writable-p erc-log-channels-directory)))
       (if (functionp erc-enable-logging)
	   (funcall erc-enable-logging buffer)
	 (buffer-local-value 'erc-enable-logging buffer))))