(defun alpha (parameter) (interactive "sChange Background Alpha:") (set-frame-parameter nil 'alpha (string-to-number parameter)) )
まるっとalphaコマンドを実行したらいいんです。
(defun alpha (parameter) (interactive "sChange Background Alpha:") (set-frame-parameter nil 'alpha (string-to-number parameter)) )
まるっとalphaコマンドを実行したらいいんです。