|
@@ -9019,7 +9019,7 @@ from."
|
|
|
(let ((ido-enter-matching-directory nil))
|
|
|
(apply 'ido-completing-read (concat (car args))
|
|
|
(if (consp (car (nth 1 args)))
|
|
|
- (mapcar (lambda (x) (car x)) (nth 1 args))
|
|
|
+ (mapcar 'car (nth 1 args))
|
|
|
(nth 1 args))
|
|
|
(cddr args)))
|
|
|
(if (and org-completion-use-iswitchb
|
|
@@ -9027,7 +9027,7 @@ from."
|
|
|
(listp (second args)))
|
|
|
(apply 'org-iswitchb-completing-read (concat (car args))
|
|
|
(if (consp (car (nth 1 args)))
|
|
|
- (mapcar (lambda (x) (car x)) (nth 1 args))
|
|
|
+ (mapcar 'car (nth 1 args))
|
|
|
(nth 1 args))
|
|
|
(cddr args))
|
|
|
(apply 'completing-read args)))))
|