diff options
| author |  Joey Hess <joey@kitenet.net> | 2011-09-20 00:49:40 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2011-09-20 00:49:40 -0400 |
| commit | 52533799535ebe1c133e2687ff1c5612d5bdb51d (patch) | |
| tree | a30db8d442a4aa49d8cc45b5dc589b7a5a68b4dc /Options.hs | |
| parent | a1578e33dce4a9e7dcbd700077fc73237c35d19a (diff) | |
convert Token to have separate constructors for each peice of syntax
Diffstat (limited to 'Options.hs')
| -rw-r--r-- | Options.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Options.hs b/Options.hs index 44d5f3674..eeb3639b4 100644 --- a/Options.hs +++ b/Options.hs @@ -58,5 +58,5 @@ matcherOptions = , shortopt ")" "close group of options" ] where - longopt o d = Option [] [o] (NoArg (token o)) d - shortopt o d = Option o [] (NoArg (token o)) d + longopt o d = Option [] [o] (NoArg (addToken o)) d + shortopt o d = Option o [] (NoArg (addToken o)) d |