(mapcar
(lambda (searche-request)
(if (not (string= searche-request ""))
- (list "-s" searche-request)))
+ (list "--search" 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) ","))
)))