Function: list-fontsets

list-fontsets is an autoloaded, interactive and byte-compiled function defined in mule-diag.el.gz.

Signature

(list-fontsets ARG)

Documentation

Display a list of all fontsets.

This shows the name, size, and style of each fontset. With prefix arg, also list the fonts contained in each fontset; see the function describe-fontset for the format of the list.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/international/mule-diag.el.gz
;;;###autoload
(defun list-fontsets (arg)
  "Display a list of all fontsets.
This shows the name, size, and style of each fontset.
With prefix arg, also list the fonts contained in each fontset;
see the function `describe-fontset' for the format of the list."
  (interactive "P")
  (let ((help-buffer-under-preparation t))
    (if (not (and window-system (fboundp 'fontset-list)))
	(error "No fontsets being used")
      (help-setup-xref (list #'list-fontsets arg)
		       (called-interactively-p 'interactive))
      (with-output-to-temp-buffer (help-buffer)
	(with-current-buffer standard-output
	  ;; This code is duplicated near the end of mule-diag.
	  (let ((fontsets
		 (sort (fontset-list)
		       (lambda (x y)
			 (string< (fontset-plain-name x)
				  (fontset-plain-name y))))))
	    (while fontsets
	      (if arg
		  (print-fontset (car fontsets) nil)
		(insert "Fontset: " (car fontsets) "\n"))
	      (setq fontsets (cdr fontsets)))))))))