From 88d9c4a76e27ddee2170bb21e90e0f0fcf77b44c Mon Sep 17 00:00:00 2001
From: defanor <defanor@uberspace.net>
Date: Mon, 4 Dec 2017 19:14:06 +0300
Subject: Introduce the omitNamedOptions option

It is nice to omit them, but may lead to ambiguity -- so better to
provide a safer option.
---
 Example.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'Example.hs')

diff --git a/Example.hs b/Example.hs
index 4784aa2..a5dcb35 100644
--- a/Example.hs
+++ b/Example.hs
@@ -29,7 +29,7 @@ main = do
                   , fooBar = Just (Foo FooArgs { arg1 = 1
                                                , arg2 = "a string"})
                   , fooBar2 = Bar}
-      args = toArgs defMod val
+      args = toArgs defOpt val
   print val
   print args
-  print (fromArgs defMod args :: Either String Input)
+  print (fromArgs defOpt args :: Either String Input)
-- 
cgit v1.2.3