Emacs中視窗顯示表和緩衝區顯示表衝突
在 Emacs 中；
有沒有辦法同時
window-display-table發揮buffer-display-table作用？原因是，我正在使用Pretty-Control-L（來自Emacs Goodies El腳本包）和空格（
whitespace.el我認為它在基本 Emacs 發行版中，但我不確定）。
- Pretty-Control-L通過在 window-local 中
^L設置條目，以自定義方式視覺化換頁 (。C-lwindow-display-table- Whitespace通過在 buffer-local 中設置條目來視覺化空格、製表符和換行符**
buffer-display-table**。（以及通過使用font-lock功能）。這些使用衝突（或者更確切地說，使用 a
window-display-table和buffer-display-table衝突），因為如果不是，window-display-table它nil完全覆蓋任何buffer-display-table顯示在該視窗中的緩衝區。引用Emacs Lisp手冊：
38.21.2 活動顯示表
每個視窗都可以指定一個顯示表，每個緩衝區也可以。當緩衝區 B 顯示在視窗 W 中時，如果有一個緩衝區，則 display 使用視窗 W 的顯示表；否則，緩衝區 B 的顯示表（如果有的話）；否則，標準顯示表（如果有）。選擇的顯示表稱為“活動”顯示表。
$$ … $$
（我強調）
那麼，有沒有簡單的方法來鞏固這一點？或者是重新編碼其中一個以使用與另一個相同的機制的唯一方法？
我一直在考慮編寫一個與空白視覺化兼容的換頁視覺化的小（即更小）粗略變體，它只使用一些緩衝區載入鉤子（或其他）
^L在buffer-display-table. 但我想知道是否有更簡單的選擇。**編輯：**為了澄清這個問題，這裡是一個帶註釋的“互動式 Lisp”會話的摘錄（即來自
*scratch*-buffer）。這顯示了命令及其輸出，並帶有效果註釋：;; Emacs is started with `-q', to not load my init-file(s). ;; First, write some sample text with tabs and line-feeds: "A tab: and some text A line-feed:and some text" ;; Make sure that it is a tab on the first line (input by `C-q TAB') ;; and a line-feed on the second line (input by `C-q C-l'). ;; These probably won't copy properly into Stack Exchange. ;; This shows the spaces as center-dots, tabs as `>>'-glyphs and ;; new-lines as $'s (or perhaps other glyphs, depending on system ;; setup...). All of them fontified to be dimmed out on yellow/beige/white ;; background. (whitespace-mode t) t ;; This turns on pretty-control-l mode. The `^L' above will be ;; prettified... Since this sets the window display table, the glyphs ;; for the spaces/tabs/new-lines will disappear, but the background of ;; spaces/tabs will still be yellow/beige (since that's done with ;; fontification, not display tables). (pretty-control-l-mode t) t ;; This turns pretty-control-l mode OFF again. The form-feed will ;; revert to displaying as `^L'. However, the glyphs for the ;; spaces/tabs/new-lines will not re-appear, since this only removes ;; the `C-l'-entry in the window-display-list, not the entire list. (pretty-control-l-mode 0) nil ;; Nil the window-display-table, to verify that is the culprit. This ;; will re-enable the glyphs defined by whitespace-mode (since they ;; are still in the buffer display-table). (set-window-display-table nil nil) nil ;; To round of; this is my Emacs-version: (emacs-version) "GNU Emacs 23.4.1 (i686-pc-linux-gnu, GTK+ Version 2.24.12) of 2012-09-22 on akateko, modified by Debian" ;;End.
很抱歉給您帶來麻煩。按照你的食譜，我沒有看到你報告的問題。也許描述不完整？我可以同時打開
pretty-control-l-mode和whitespace-mode，我看到的每個行為似乎都很正常。也許您使用了一些自定義設置whitespace-style或其他東西？無論如何，如果您對
pretty-control-l-mode. 如果是這樣，請告訴我，我會將其應用於pp-c-l.el. （要進行測試，請將新選項設置為nil。）(defcustom pp^L-use-window-display-table-flag t "Non-nil: use `window-display-table'; nil: use `buffer-display-table`." :type 'boolean :group 'Pretty-Control-L) (define-minor-mode pretty-control-l-mode "Toggle pretty display of Control-l (`^L') characters. With ARG, turn pretty display of `^L' on if and only if ARG is positive." :init-value nil :global t :group 'Pretty-Control-L (if pretty-control-l-mode (add-hook 'window-configuration-change-hook 'refresh-pretty-control-l) (remove-hook 'window-configuration-change-hook 'refresh-pretty-control-l)) (walk-windows (lambda (window) (let ((display-table (if pp^L-use-window-display-table-flag ; <========= (or (window-display-table window) (make-display-table)) (if buffer-display-table (copy-sequence buffer-display-table) (make-display-table))))) (aset display-table ?\014 (and pretty-control-l-mode (pp^L-^L-display-table-entry window))) (if pp^L-use-window-display-table-flag ; <========= (set-window-display-table window display-table) (setq buffer-display-table display-table)))) 'no-minibuf 'visible))已更新以添加評論執行緒，以防評論在某些時候被刪除：
順便說一句，我想知道文件中描述的顯示表的層次結構是否不應該使用某種繼承來應用。對於一個級別（例如視窗）來完全遮蔽較低級別（例如緩衝區）似乎有點原始。您可以考慮向 Mx report-emacs-bug 發送有關此問題的問題。– 德魯 2014 年 9 月 24 日 16:36
平？如果上述更改有幫助，您能否告訴我？謝謝。– 德魯 2014 年 10 月 14 日 18:12
我剛剛閱讀了這個答案（我已經有一段時間沒有接觸過網際網路的這一部分了……）。當我得到它時，我會檢查它，也許在幾天左右。我稍後會酌情回复“已批准答案”（如果有效）或評論（否則）。– 約翰 E 2014 年 10 月 25 日 22:32
我編輯了這個問題，以添加一個更充實的方法來顯示問題。我很想知道你是否得到相同的結果。— 另外，有沒有辦法用使用者提供的文件來隱藏系統安裝的 .el 文件（我真的只是一個“使用者”，而不是一個 lisp 程序員……）？我真的不想弄亂 deb-packages 安裝的文件。（這就是為什麼我在測試你的答案之前做了問題食譜……） – Johan E 2014-10-27 01:02:07
在我寫完最後一條評論五秒鐘後，我意識到我可以將程式碼粘貼到草稿中並用 Cj 執行它來測試。（無需編輯任何文件。）結果：它很有魅力！謝謝！（=> 已接受答案）但是，我仍然想知道您是否從我的問題配方中得到與我相同的結果（在修補程式碼之前）。– 約翰 E 2014 年 10 月 27 日在 1:09
我剛按照你的新食譜，我看到了你描述的一切（如此清楚）。然後我閱讀了您剛剛添加的新評論。很高興知道一切正常。感謝您的回饋。– 德魯 2014 年 10 月 27 日 1:12