fix: ui: don't show root account, respect not:ACCT (fix #1782)
This commit is contained in:
		
							parent
							
								
									0d83bdf6d7
								
							
						
					
					
						commit
						2bb309b073
					
				| @ -120,8 +120,9 @@ splitAtElement x l = | ||||
| 
 | ||||
| -- trees | ||||
| 
 | ||||
| -- | Get the leaves of this tree as a list. The root node is not counted as a leaf. | ||||
| treeLeaves :: Tree a -> [a] | ||||
| treeLeaves = foldTree (\a bs -> (if null bs then (a:) else id) $ concat bs) | ||||
| treeLeaves = drop 1 . foldTree (\a bs -> (if null bs then (a:) else id) $ concat bs) | ||||
| 
 | ||||
| -- text | ||||
| 
 | ||||
|  | ||||
		Loading…
	
		Reference in New Issue
	
	Block a user