extra option added
parent
bca17dab68
commit
c224c479eb
|
@ -79,7 +79,7 @@ fmtData :: [MixerData] -> String
|
||||||
fmtData = (separator ++ ) . intercalate separator . map getStatus
|
fmtData = (separator ++ ) . intercalate separator . map getStatus
|
||||||
|
|
||||||
runAmixer :: String -> IO String
|
runAmixer :: String -> IO String
|
||||||
runAmixer mixer = readProcess "amixer" ["get", mixer] ""
|
runAmixer mixer = readProcess "amixer" ["get", "-c", "0", mixer] ""
|
||||||
|
|
||||||
|
|
||||||
queryVolume :: IO String
|
queryVolume :: IO String
|
||||||
|
|
Loading…
Reference in New Issue