FIX command typo
This commit is contained in:
parent
63f4c0c035
commit
ebbb2a714d
|
@ -185,7 +185,7 @@ data Removable = Removable
|
||||||
|
|
||||||
instance Mountable Removable where
|
instance Mountable Removable where
|
||||||
mount Removable { deviceSpec = d, label = l } m =
|
mount Removable { deviceSpec = d, label = l } m =
|
||||||
io $ runMountNotify "mount" [c, "-b", d] l m
|
io $ runMountNotify "udisksctl" [c, "-b", d] l m
|
||||||
where
|
where
|
||||||
c = if m then "unmount" else "mount"
|
c = if m then "unmount" else "mount"
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue