defcommand firefox Start Switchto Firefox run-or-raise firefox class F

1
2
3
4
5
(defcommand firefox () ()
"Start/Switchto Firefox."
(run-or-raise "firefox" '(:class "Firefox")))
(define-key *root-map* (kbd "f") "firefox")