Function: elint-log

elint-log is a byte-compiled function defined in elint.el.gz.

Signature

(elint-log TYPE STRING ARGS)

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/elint.el.gz
;;;
;;; Message functions
;;;

(defun elint-log (type string args)
  (elint-log-message (format "%s:%d:%s: %s"
			     (let ((f (buffer-file-name)))
			       (if f
				   (file-name-nondirectory f)
				 (buffer-name)))
			     (if (boundp 'elint-current-pos)
				 (save-excursion
				   (goto-char elint-current-pos)
				   (1+ (count-lines (point-min)
						    (line-beginning-position))))
			       0)	; unknown position
			     type
			     (apply #'format-message string args))))