showCreate :: TCreate -> [String]
showCreate c =
    ("Create file: " ++ (showMaybeStr $ cfile c)) : (indent . concat $ map showCreateChild (citems c))
showCreate :: TCreate -> [String]
showCreate c =
    ("Create file: " ++ (showMaybeStr $ cfile c)) : (indent . concat $ map showCreateChild (citems c))
showCreate c =
    ("Create file: " ++ (showMaybeStr $ cfile c)) : (indent . concat $ map showCreateChild (citems c))