diff options
Diffstat (limited to 'helm-utils.el')
-rw-r--r-- | helm-utils.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/helm-utils.el b/helm-utils.el index 1a8360a5..a835a260 100644 --- a/helm-utils.el +++ b/helm-utils.el @@ -369,7 +369,8 @@ from its directory." (eq major-mode 'org-agenda-mode)) org-directory (expand-file-name org-directory)) - (with-current-buffer buf default-directory))) + (with-current-buffer buf + (expand-file-name default-directory)))) ;; imenu (marker). (marker (or (buffer-file-name (marker-buffer (cdr sel))) @@ -379,7 +380,7 @@ from its directory." (if (and ffap-url-regexp (string-match ffap-url-regexp it)) it (expand-file-name it)) - default-directory)) + (expand-file-name default-directory))) ((and (stringp sel) (or (file-remote-p sel) (file-exists-p sel))) (expand-file-name sel)) @@ -389,11 +390,11 @@ from its directory." ;; Occur. (grep-line (with-current-buffer (get-buffer (car grep-line)) - (or (buffer-file-name) default-directory))) + (expand-file-name (or (buffer-file-name) default-directory)))) ;; Url. ((and (stringp sel) ffap-url-regexp (string-match ffap-url-regexp sel)) sel) ;; Default. - (t default-preselection)))))) + (t (expand-file-name default-preselection))))))) (put 'helm-quit-and-find-file 'helm-only t) (defun helm-generic-sort-fn (s1 s2) |