projects
/
mymail.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Increased the version number to 0.9.5.
[mymail.git]
/
mymail-vm.el
diff --git
a/mymail-vm.el
b/mymail-vm.el
index
6e72e2e
..
dc1976c
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)
@@
-42,9
+42,9
@@
prefaced with \\."
(mapcar
(lambda (searche-request)
(if (not (string= searche-request ""))
(mapcar
(lambda (searche-request)
(if (not (string= searche-request ""))
- (list "-
s
" searche-request)))
+ (list "-
-search
" searche-request)))
(if (string= (substring param 0 1) "\\")
(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) ","))
)))