diff options
| author | jao <jao@gnu.org> | 2022-08-02 14:26:36 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2022-08-02 14:27:17 +0100 |
| commit | bd3d4ab6d7dffd9f8565af32471dc58aaf5a2214 (patch) | |
| tree | 146c6ee6ffb932e85d38785f8dd72ff6cec4e22a /elisp/geiser-repl.el | |
| parent | 2fac53cb84e1341fd838ffdd2d9f7e09ecaf617a (diff) | |
| download | geiser-bd3d4ab6d7dffd9f8565af32471dc58aaf5a2214.tar.gz geiser-bd3d4ab6d7dffd9f8565af32471dc58aaf5a2214.tar.bz2 | |
geiser-repl: honour .dir-local.el files in REPL buffers
Should fix issue #48
Diffstat (limited to 'elisp/geiser-repl.el')
| -rw-r--r-- | elisp/geiser-repl.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/elisp/geiser-repl.el b/elisp/geiser-repl.el index 5a004e5..3ce191f 100644 --- a/elisp/geiser-repl.el +++ b/elisp/geiser-repl.el @@ -439,9 +439,9 @@ will be set up using `geiser-connect-local' when a REPL is started.") (add-text-properties start end '(font-lock-fontified t - fontified t - font-lock-multiline t - font-lock-face geiser-font-lock-repl-output))) + fontified t + font-lock-multiline t + font-lock-face geiser-font-lock-repl-output))) (defun geiser-repl--narrow-to-prompt () "Narrow to active prompt region and return t, otherwise returns nil." @@ -922,6 +922,7 @@ buffer." "Major mode for interacting with an inferior scheme repl process. \\{geiser-repl-mode-map}" (scheme-mode-variables) + (hack-dir-local-variables-non-file-buffer) (set (make-local-variable 'geiser-repl--last-output-start) (point-marker)) (set (make-local-variable 'geiser-repl--last-output-end) (point-marker)) (set (make-local-variable 'face-remapping-alist) |