Update dependencies.

This commit is contained in:
Dominik Pantůček 2023-06-15 22:02:32 +02:00
parent 7335f86bb9
commit 628a37d06c
3 changed files with 8 additions and 7 deletions

View file

@ -187,7 +187,7 @@ brmember-parser.o: brmember-parser.import.scm
brmember-parser.import.scm: $(BRMEMBER-PARSER-SOURCES) brmember-parser.import.scm: $(BRMEMBER-PARSER-SOURCES)
MEMBERS-PRINT-SOURCES=members-print.scm util-dict-list.import.scm \ MEMBERS-PRINT-SOURCES=members-print.scm util-dict-list.import.scm \
brmember.import.scm cal-month.import.scm table-old.import.scm \ brmember.import.scm cal-month.import.scm table.import.scm \
listing.import.scm ansi.import.scm cal-period.import.scm \ listing.import.scm ansi.import.scm cal-period.import.scm \
primes.import.scm mbase.import.scm configuration.import.scm \ primes.import.scm mbase.import.scm configuration.import.scm \
bank-account.import.scm members-fees.import.scm \ bank-account.import.scm members-fees.import.scm \
@ -330,7 +330,7 @@ NOTIFICATIONS-SOURCES=notifications.scm brmember.import.scm \
members-payments.import.scm util-format.import.scm \ members-payments.import.scm util-format.import.scm \
brmember-format.import.scm configuration.import.scm \ brmember-format.import.scm configuration.import.scm \
util-time.import.scm members-fees.import.scm mbase.import.scm \ util-time.import.scm members-fees.import.scm mbase.import.scm \
members-print.import.scm table-old.import.scm \ members-print.import.scm table.import.scm \
bank-account.import.scm logging.import.scm bank-account.import.scm logging.import.scm
notifications.o: notifications.import.scm notifications.o: notifications.import.scm

View file

@ -50,7 +50,7 @@
util-dict-list util-dict-list
brmember brmember
cal-month cal-month
table-old table
listing listing
ansi ansi
cal-period cal-period
@ -502,7 +502,7 @@
(define (unpaired-table mb . args) (define (unpaired-table mb . args)
(apply (apply
table->list table->string-list
(cons (cons
(list "Id" "Date" "Amount" "" "VS" "Type" "Message" "Account" "Bank") (list "Id" "Date" "Amount" "" "VS" "Type" "Message" "Account" "Bank")
(map (map
@ -518,8 +518,9 @@
(bank-transaction-bank tr) (bank-transaction-bank tr)
)) ))
(mbase-unpaired mb))) (mbase-unpaired mb)))
#:row0-border #t #:border '(((#:bottom #:right light) ... (#:bottom light))
#:col-border #t ((#:right light) ... none)
...)
args)) args))
;; Prints all transactions which the members base considers unpaired. ;; Prints all transactions which the members base considers unpaired.

View file

@ -84,7 +84,7 @@
(if (null? tbl) (if (null? tbl)
widths widths
(loop (combine-column-widths widths (loop (combine-column-widths widths
(map sgr-cell-min-width (car tbl))) (map cell-query (car tbl)))
(cdr tbl)))))) (cdr tbl))))))
;; Minimal widths ;; Minimal widths