Emacs: Predicate buffers for every frame.

This commit is contained in:
tastytea 2020-08-02 00:42:45 +02:00
parent 9544a6ab83
commit 7a339a4aba
1 changed files with 6 additions and 2 deletions

View File

@ -1,6 +1,6 @@
;;; buffers.el --- Default settings for buffers. -*- lexical-binding: t; -*-
;; Time-stamp: <2020-06-03T17:54:14+0200>
;; Time-stamp: <2020-08-02T00:42:18+0200>
;;; Commentary:
;; * Setup scratch buffer.
@ -35,7 +35,11 @@
(if (string-match expression (buffer-name buffer))
(throw 'return nil)))
t))
(set-frame-parameter nil 'buffer-predicate 'my/buffer-predicate)
; Doesn't work with use-package?
(add-hook 'after-make-frame-functions
(lambda (frame)
(set-frame-parameter
frame 'buffer-predicate 'my/buffer-predicate)))
(defun my/truncate-lines ()
"Truncate lines in local buffer instead of wrapping them."