1#@!#!123s

file_get_contents 1#@!#!123s
: / usr / share / emacs / 24.3 / lisp /
Filename : dynamic-setting.elc
back
;ELC���
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:12:51 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/dynamic-setting.el
;;; in Emacs version 24.3
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.

;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


#@285 Change font and/or font settings for frames on display DISPLAY-OR-FRAME.
If DISPLAY-OR-FRAME is a frame, the display is the one for that frame.

If SET-FONT is non-nil, change the font for frames.  Otherwise re-apply the
current form for the frame (i.e. hinting or somesuch changed).
(defalias 'font-setting-change-default-font #[(display-or-frame set-font) "\306\307!\205�\307 \310!\211\205g�\311!\205g�\312 \210\203&�\313\n\314	#\202g�	\314\211\205f�
@\315\316\317\320\f\317$\321\"\206A�\322\f\323\"\211\203]�\324\f\323#\210\325\317\f\326\327\330\327\331\327\320&\n\210)
A\211\204.�\314**\207" [display-or-frame frame-list new-font set-font f --dolist-tail-- fboundp font-get-system-font frames-on-display-list display-graphic-p clear-font-cache set-frame-font nil font-get face-attribute default :font :user-spec frame-parameter font-parameter set-frame-parameter set-face-attribute :width normal :weight :slant frame-font] 12 (#$ . 557)])
#@258 Handle config-changed-event on the display in EVENT.
Changes can be
  The monospace font. If `font-use-system-font' is nil, the font
    is not changed.
  The normal font.
  Xft parameters, like DPI and hinting.
  The Gtk+ theme name.
  The tool bar style.
(defalias 'dynamic-setting-handle-config-changed-event #[(event) "A@\3048\211\305=\203�\203�\306	\307\"\202:�\n\310=\203&�\306	\311\"\202:�\n\312=\2031�\313 \202:�\n\314=\205:�\315\307!*\207" [event display-name type font-use-system-font 2 monospace-font-name font-setting-change-default-font t font-render nil theme-name clear-face-cache tool-bar-style force-mode-line-update] 4 (#$ . 1523) "e"])
(define-key special-event-map [config-changed-event] 'dynamic-setting-handle-config-changed-event)