diff --git a/src/brmember-format.scm b/src/brmember-format.scm index 67b40bb..7cc83a1 100644 --- a/src/brmember-format.scm +++ b/src/brmember-format.scm @@ -78,6 +78,8 @@ (sprintf "~A" (member-payments-total mr))) ((#\B) ; Current balance (sprintf "~A" (member-total-balance mr))) + ((#\A) ; Flags (attributes) list + (sprintf "~A" (brmember-flags mr))) ((#\~) "~")) resl)) (loop (cdr fmtl)