projects
/
mymail.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Added the computation of the number of extracted mails.
[mymail.git]
/
mymail-vm.el
diff --git
a/mymail-vm.el
b/mymail-vm.el
index
6e72e2e
..
5d9d50c
100644
(file)
--- a/
mymail-vm.el
+++ b/
mymail-vm.el
@@
-31,7
+31,7
@@
The string `mymail/default-search-request' is automatically
concatenated to the provided request, except if the request is
prefaced with \\."
(interactive
concatenated to the provided request, except if the request is
prefaced with \\."
(interactive
- (list (read-string "mymail: " nil 'mymail-vm-history)))
+ (list (read-string "mymail
-vm
: " nil 'mymail-vm-history)))
(let ((n 1)
(mbox-name nil)
(let ((n 1)
(mbox-name nil)
@@
-44,7
+44,7
@@
prefaced with \\."
(if (not (string= searche-request ""))
(list "-s" searche-request)))
(if (string= (substring param 0 1) "\\")
(if (not (string= searche-request ""))
(list "-s" searche-request)))
(if (string= (substring param 0 1) "\\")
- (split-string (substring param 1 nil))
+ (split-string (substring param 1 nil)
","
)
(split-string (concat param "," mymail/default-search-request) ","))
)))
(split-string (concat param "," mymail/default-search-request) ","))
)))