summaryrefslogtreecommitdiff
path: root/src/System/Linux/RTNetlink.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/System/Linux/RTNetlink.hs')
-rw-r--r--src/System/Linux/RTNetlink.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/System/Linux/RTNetlink.hs b/src/System/Linux/RTNetlink.hs
index 642ab43..2deb11d 100644
--- a/src/System/Linux/RTNetlink.hs
+++ b/src/System/Linux/RTNetlink.hs
@@ -39,10 +39,10 @@ functions to make this easier.
> main :: IO ()
> main = runRTNL $ do
> let mybridge = LinkName "mybridge"
-> create (Bridge mybridge)
+> create (Bridge, mybridge)
> change mybridge Up
-> state <- dump mybridge
-> when (head state == Up) $
+> state <- dump' mybridge
+> when (state == Up) $
> liftIO (putStrLn "I did it, mom!")
> destroy mybridge
-}