From 66ec8b06541dc7a7da0aede8c9aacf421514b606 Mon Sep 17 00:00:00 2001
From: Francois Fleuret <francois@fleuret.org>
Date: Thu, 10 Oct 2013 20:23:43 +0200
Subject: [PATCH] Set the max nb of mails to 500.

---
 mymail-vm.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/mymail-vm.el b/mymail-vm.el
index d08583c..10bcb7d 100644
--- a/mymail-vm.el
+++ b/mymail-vm.el
@@ -83,7 +83,8 @@ prefaced with \\."
     (if (= (apply 'call-process
                   (nconc (list "mymail" nil nil nil
                                "--output" mbox-name
-                               "--default-search" "p")
+                               "--default-search" "p"
+                               "--nb-mails-max" "500")
                          search-args))
            0)
         (vm-visit-folder mbox-name t)
-- 
2.20.1