代码拉取完成,页面将自动刷新
同步操作将从 latpaw/emacs 强制同步,此操作会覆盖自 Fork 仓库以来所做的任何修改,且无法恢复!!!
确定后同步将在后台操作,完成时将刷新页面,请耐心等待。
(autoload 'mf-max-display-pixel-width "maxframe" "" nil)
(autoload 'mf-max-display-pixel-height "maxframe" "" nil)
(autoload 'maximize-frame "maxframe" "" t)
(autoload 'restore-frame "maxframe" "" t)
(when *is-cocoa-emacs*
(eval-after-load 'maxframe
'(progn
(fset 'maximize-frame 'x-maximize-frame)
(fset 'restore-frame 'x-restore-frame))))
(when *is-a-mac*
(setq mf-display-padding-width 4
mf-offset-x 0
mf-offset-y 0
mf-display-padding-height (if (when (boundp 'ns-auto-hide-menu-bar)
ns-auto-hide-menu-bar)
23
(+ 27 23))))
(require 'init-utils) ; for with-selected-frame
(defvar sanityinc/prev-frame nil "The selected frame before invoking `make-frame-command'.")
(defadvice make-frame-command (before sanityinc/note-previous-frame activate)
"Record the selected frame before creating a new one interactively."
(setq sanityinc/prev-frame (selected-frame)))
(defun maybe-maximize-frame (&optional frame)
(with-selected-frame frame
(when (and window-system
sanityinc/prev-frame
(maximized-p sanityinc/prev-frame))
(maximize-frame))))
(add-hook 'after-make-frame-functions 'maybe-maximize-frame)
(add-hook 'after-init-hook 'maybe-maximize-frame)
(defun within-p (a b delta)
(<= (abs (- b a)) delta))
(defun maximized-p (&optional frame)
(or (not (with-selected-frame frame window-system))
(and (within-p (mf-max-display-pixel-width)
(frame-pixel-width frame)
(frame-char-width frame))
(within-p (mf-max-display-pixel-height)
(+ mf-display-padding-height (frame-pixel-height frame))
(frame-char-height frame)))))
(provide 'init-maxframe)
此处可能存在不合适展示的内容,页面不予展示。您可通过相关编辑功能自查并修改。
如您确认内容无涉及 不当用语 / 纯广告导流 / 暴力 / 低俗色情 / 侵权 / 盗版 / 虚假 / 无价值内容或违法国家有关法律法规的内容,可点击提交进行申诉,我们将尽快为您处理。