-fth-dec-file can't handle lambdas
instance Data.TH.Object.Object InputDropboxFiles String Language.JavaScript.Interpret.Primitive where
toObject x@(InputDropboxFiles {})
= fromList
(Data.Maybe.catMaybes
[Just
(\ k_axsq v_axsr -> (k_axsq, Data.TH.Convert.convert v_axsr)
"root" (inputDropboxFilesRoot x)),
Just
(\ k_axsq v_axsr -> (k_axsq, Data.TH.Convert.convert v_axsr)
"path" (inputDropboxFilesPath x)),
fmap
(\ k_axsq v_axsr -> (k_axsq, Data.TH.Convert.convert v_axsr) "rev")
(inputDropboxFilesRev x),
Just
(\ k_axsq v_axsr -> (k_axsq, Data.TH.Convert.convert v_axsr)
"access_token" (inputDropboxFilesAccess_token x))])
(\ k_axsq v_axsr -> (k_axsq, Data.TH.Convert.convert v_axsr)
"root" (inputDropboxFilesRoot x))
should be
((\ k_axsq v_axsr -> (k_axsq, Data.TH.Convert.convert v_axsr))
"root" (inputDropboxFilesRoot x))
ie. the lambda needs parentheses around it.