- (args (mapconcat (lambda (x) (concat "-s " "\"" x "\""))
- (split-string param ",")
- " ")))
+ (args (mapconcat
+ (lambda (searche-request)
+ (if (not (string= searche-request ""))
+ (concat "-s " "\"" searche-request "\"")))
+ (split-string (concat param "," mymail/default-search-request) ",")
+ " ")))
+