15 lines
310 B
Haskell
15 lines
310 B
Haskell
|
module XMonad.CustomPrompt (xdg_open, browser) where
|
||
|
|
|
||
|
|
import qualified XMonad.Prompt.AppLauncher as AL
|
||
|
|
import XMonad.Prompt
|
||
|
|
import XMonad (X)
|
||
|
|
|
||
|
|
launchApp :: AL.Application -> X ()
|
||
|
|
launchApp = AL.launchApp def
|
||
|
|
|
||
|
|
xdg_open :: X ()
|
||
|
|
xdg_open = launchApp "xdg-open"
|
||
|
|
|
||
|
|
browser :: X ()
|
||
|
|
browser = launchApp "qutebrowser"
|