Function: fancy-about-screen

fancy-about-screen is a byte-compiled function defined in startup.el.gz.

Signature

(fancy-about-screen)

Documentation

Display fancy About screen.

Source Code

;; Defined in /usr/src/emacs/lisp/startup.el.gz
(defun fancy-about-screen ()
  "Display fancy About screen."
  (let ((frame (fancy-splash-frame)))
    (save-selected-window
      (select-frame frame)
      (switch-to-buffer "*About GNU Emacs*")
      (setq buffer-undo-list t)
      (let ((inhibit-read-only t))
	(erase-buffer)
	(if pure-space-overflow
	    (insert pure-space-overflow-message))
	(fancy-splash-head)
	(dolist (text fancy-about-text)
	  (apply #'fancy-splash-insert text)
	  (insert "\n"))
	(set-buffer-modified-p nil)
	(goto-char (point-min))
	(force-mode-line-update))
      (use-local-map splash-screen-keymap)
      (setq tab-width 22)
      (setq buffer-read-only t)
      ;; Place point somewhere it doesn't cover a character.
      (goto-char (point-min))
      (re-search-forward "\n$" nil nil 2))))