-- | Select a password.
--
selectPassword :: String -> X ()
selectPassword passLabel = spawn $ "/home/yzhou/bin/scripts/pass0 --clip " ++ passLabel
selectPassword :: String -> X ()
selectPassword passLabel = spawn $ "/home/yzhou/bin/scripts/pass0 --clip " ++ passLabel
selectPassword passLabel = spawn $ "/home/yzhou/bin/scripts/pass0 --clip " ++ passLabel