* small updates for guile 1.x compatibility (WIP)

This commit is contained in:
Dirk-Jan C. Binnema
2011-07-18 08:37:06 +03:00
parent 815d5ad862
commit 3b7f2ab25d
3 changed files with 14 additions and 7 deletions

View File

@ -19,8 +19,11 @@
;; some guile/scheme functions to get various statistics of my mu
;; message store.
(use-modules (ice-9 optargs)) ;; for guile 1.x compatibility
;; note, this is a rather inefficient way to calculate the number; for
;; demonstration purposes only
;; demonstration purposes only...
(define* (mu:stats:count #:optional (EXPR ""))
"Count the total number of messages. If the optional EXPR is
provided, only count the messages that match it.\n"