直接在.emacs 文件中增加一下代码
打卡emacs 之后 按F8 可以在透明 和不透明之间切换...
可以根据自己喜欢更改按键
(global-set-key [(f8)] 'loop-alpha) ;;注意这行中的F8 , 可以改成你想要的按键
(setq alpha-list '((85 55) (100 100)))
(defun loop-alpha ()
(interactive)
(let ((h (car alpha-list)))
((lambda (a ab)
(set-frame-parameter (selected-frame) 'alpha (list a ab))
(add-to-list 'default-frame-alist (cons 'alpha (list a ab)))
) (car h) (car (cdr h)))
(setq alpha-list (cdr (append alpha-list (list h))))
)
)
打卡emacs 之后 按F8 可以在透明 和不透明之间切换...
可以根据自己喜欢更改按键