X-Git-Url: https://www.fleuret.org/cgi-bin/gitweb/gitweb.cgi?a=blobdiff_plain;f=mymail-vm.el;h=10bcb7d9c49e4eba8fac9ba97d82ed806761ab49;hb=3b7b0589e990e27d91681e1b1aed65e7dbc90a05;hp=d08583cd8a90a586c8c314603477740322e12e51;hpb=d55edbe1d2e93469dea60c8b984d07a5d6b85359;p=mymail.git

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)