Commit cc5eb08f authored by Philipp Meyer's avatar Philipp Meyer

Do not check default properties when displaying structure

parent 09e5a20f
......@@ -110,7 +110,12 @@ options =
("Refine with METHOD (trap, siphon, utrap, usiphon, none, all)")
, Option "s" ["structure"]
(NoArg (\opt -> Right opt { optPrintStructure = True }))
(NoArg (\opt -> Right opt {
optPrintStructure = True,
optProperties = case optProperties opt of
PropDefault -> PropList []
(PropList props) -> PropList props
}))
"Print structural information"
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment