diff options
| author | Bastien Guerry <bzg@altern.org> | 2012-09-26 11:06:20 +0200 |
|---|---|---|
| committer | Bastien Guerry <bzg@altern.org> | 2012-09-26 11:06:20 +0200 |
| commit | 1b53c705dee8ee2c2bfc327820542e510749ea6a (patch) | |
| tree | 55366208e42c42029e97ae9a47f23e21b2ef725b | |
| parent | b50c465c1703be6fbf8b499bcb1df6574e9691e2 (diff) | |
| download | org-mode-1b53c705dee8ee2c2bfc327820542e510749ea6a.tar.gz | |
org.el: Fix `org-display-outline-path' (see commit 979567)
* org.el (org-format-outline-path): Small docstring
enhancement.
(org-display-outline-path): Fix order or arguments.
| -rw-r--r-- | lisp/org.el | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/lisp/org.el b/lisp/org.el index 7bfc18c..9b9b983 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -10841,8 +10841,8 @@ avoiding backtracing. Refile target collection makes use of that." WIDTH is the maximum number of characters that is available. PREFIX is a prefix to be included in the returned string, such as the file name. -SEPARATOR is inserted between the different parts of the path, the default -is \"/\"." +SEPARATOR is inserted between the different parts of the path, +the default is \"/\"." (setq width (or width 79)) (if prefix (setq width (- width (length prefix)))) (if (not path) @@ -10876,8 +10876,7 @@ is \"/\"." h) path (or separator "/")))))) -(defun org-display-outline-path (&optional file current separator - just-return-string) +(defun org-display-outline-path (&optional file current separator just-return-string) "Display the current outline path in the echo area. If FILE is non-nil, prepend the output with the file name. @@ -10899,8 +10898,8 @@ If JUST-RETURN-STRING is non-nil, return a string, don't display a message." (org-format-outline-path path (1- (frame-width)) - separator - (and file bfn (concat (file-name-nondirectory bfn) separator)))) + (and file bfn (concat (file-name-nondirectory bfn) separator)) + separator)) (if just-return-string (org-no-properties res) (message "%s" res)))) |