Làm cách nào tôi có thể đặt biến cục bộ thư mục liên quan đến vị trí tệp .dir-locals.el?

Tôi thường thấy mình trong tình huống tôi được yêu cầu đặt các đường dẫn tương đối làm biến cục bộ của thư mục. Ví dụ cmake-ide 's cmake-ide-project-dirvà cmake-ide-build-dir. Tất nhiên điều này không phải là rất di động.

Vì vậy, thay vì

.dir-locals.el:

((nil . ((cmake-ide-project-dir . "/home/user/code/project"))))

Tôi muốn một cái gì đó như

((nil . ((cmake-ide-project-dir . directory-of-current-dir-locals-file))))

Làm thế nào tôi có thể định nghĩa một biến như vậy directory-of-current-dir-locals-file? Và làm thế nào tôi sẽ thiết lập ví dụ cmake-ide-build-dir, thường là (concat directory-of-current-dir-locals-file "build")gì?

Giải pháp của tôi cho đến nay (dựa trên câu trả lời Stackoverflow này ):

.dir-locals.el:

;;; Directory Local Variables
;;; For more information see (info "(emacs) Directory Variables")

((nil . ((eval . (set (make-local-variable 'my-project-path)
                      (file-name-directory
                       (let ((d (dir-locals-find-file ".")))
                         (if (stringp d) d (car d))))))
         (cmake-ide-project-dir . my-project-path)
         (eval . (setq cmake-ide-build-dir (concat my-project-path "build")))
         )))

Bạn có thể định nghĩa biến với (defvar directory-of-current-dir-locals-file "/home/user/code/project").