summaryrefslogtreecommitdiffhomepage
path: root/net/jao-frm.el
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2019-09-25 23:54:42 +0100
committerjao <jao@gnu.org>2019-09-25 23:54:42 +0100
commitfe7f5ac92bb9dfb4dd89f0e3e018cde6d15c8608 (patch)
tree72e3e79b93e6b84a92972c3958b887c54a2c162b /net/jao-frm.el
parent6ce5bd39e302295f431c6dc46c964260e9027dba (diff)
downloadelibs-fe7f5ac92bb9dfb4dd89f0e3e018cde6d15c8608.tar.gz
elibs-fe7f5ac92bb9dfb4dd89f0e3e018cde6d15c8608.tar.bz2
frm tweak
Diffstat (limited to 'net/jao-frm.el')
-rw-r--r--net/jao-frm.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/net/jao-frm.el b/net/jao-frm.el
index aca981f..4f7ae0c 100644
--- a/net/jao-frm.el
+++ b/net/jao-frm.el
@@ -146,7 +146,8 @@
(defun jao-frm-mbox-mails (mbox)
(let ((no (ignore-errors
(substring
- (shell-command-to-string (format "frm %s|wc -l" mbox)) 0 -1))))
+ (shell-command-to-string (format "frm -s n %s|wc -l" mbox))
+ 0 -1))))
(if (stringp no) (string-to-number no) 0)))
(defun jao-frm-mail-number ()