(let* ((ids (when id (Omake.Id.to-string id)))
;; Work to use the user-originated path in the buffer name,
;; often shorter than the canonical path via pleasingly named
- ;; symlinks and tilde-substitution. These are still unique,
- ;; because they are absolute pathnames, but more readable.
+ ;; symlinks and tilde-substitution. This is still unique,
+ ;; because it's an absolute pathname, but more readable.
(proj (when id (Omake.Project.find id)))
(root (when proj (Omake.Project.omakeroot-dir proj)))