+set_consumer_key :: String -> Options -> IO Options
+set_consumer_key arg opts =
+ return opts { opt_consumer_key = Just arg }
+
+set_consumer_secret :: String -> Options -> IO Options
+set_consumer_secret arg opts =
+ return opts { opt_consumer_secret = Just arg }
+
+set_access_token :: String -> Options -> IO Options
+set_access_token arg opts =
+ return opts { opt_access_token = Just arg }
+
+set_access_secret :: String -> Options -> IO Options
+set_access_secret arg opts =
+ return opts { opt_access_secret = Just arg }
+