Function: gnus-summary-limit-strange-charsets-predicate

gnus-summary-limit-strange-charsets-predicate is a byte-compiled function defined in gnus-sum.el.gz.

Signature

(gnus-summary-limit-strange-charsets-predicate HEADER)

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-sum.el.gz
(defun gnus-summary-limit-strange-charsets-predicate (header)
  (let ((string (concat (mail-header-subject header)
			(mail-header-from header)))
	charset found)
    (dotimes (i (1- (length string)))
      (setq charset (format "%s" (char-charset (aref string (1+ i)))))
      (when (string-match "unicode\\|big\\|japanese" charset)
	(setq found t)))
    found))