[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 123191d: Clarify doc string of internal compilation
From: |
Lars Ingebrigtsen |
Subject: |
[Emacs-diffs] master 123191d: Clarify doc string of internal compilation function |
Date: |
Wed, 27 Apr 2016 18:42:01 +0000 |
branch: master
commit 123191decb7428db3b32a6c01631fa755088393a
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>
Clarify doc string of internal compilation function
* lisp/progmodes/compile.el (compilation-get-file-structure):
Clarify doc string (bug#3137).
---
lisp/progmodes/compile.el | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index 0160aab..cc04fe9 100644
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -2760,7 +2760,9 @@ FILE should be (FILENAME) or (RELATIVE-FILENAME .
DIRNAME).
In the former case, FILENAME may be relative or absolute.
The file-structure looks like this:
- ((FILENAME [DIR-FROM-PREV-MSG]) FMT LINE-STRUCT...)"
+ ((FILENAME [TRUE-DIRNAME]) FMT ...)
+
+TRUE-DIRNAME is the `file-truename' of DIRNAME, if given."
(or (gethash file compilation-locs)
;; File was not previously encountered, at least not in the form passed.
;; Let's normalize it and look again.
@@ -2815,7 +2817,7 @@ The file-structure looks like this:
(let ((fs (compilation-get-file-structure file)))
(cl-assert (eq fs (gethash file compilation-locs)))
(cl-assert (eq fs (gethash (cons (caar fs) (cadr (car fs)))
- compilation-locs)))
+ compilation-locs)))
(maphash (lambda (k v)
(if (eq v fs) (remhash k compilation-locs)))
compilation-locs)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 123191d: Clarify doc string of internal compilation function,
Lars Ingebrigtsen <=