diff --git a/init.el b/init.el index 44a23fa..7f6f7fb 100644 --- a/init.el +++ b/init.el @@ -1,5 +1,5 @@ ;;; init.el --- tastytea's Emacs init file. -;; Time-stamp: <2019-07-07T12:15:33+00:00> +;; Time-stamp: <2019-07-10T21:54:59+00:00> ;;; Commentary: ;; I am using this file with Emacs 26, but most of it will probably work with @@ -131,6 +131,19 @@ (savehist-mode t) ; Save minibuffer history. (global-auto-revert-mode t) ; Auto-revert file if changed on disk. + (defvar my/skippable-buffers '("^*Messages*" "^*Help*" "^*tramp" "^*Flycheck" + "^magit[:-]" "^*Compile" "^*package") + "Buffer names ignored by `next-buffer' and `previous-buffer'.") + (defun my/buffer-predicate (buffer) + "Returns nil if `buffer'-name matches expression in `my/skippable-buffers'." + (catch 'my-catch + (dolist (expression my/skippable-buffers) + (if (string-match expression (buffer-name buffer)) + (throw 'my-catch nil) + )) + t)) + (set-frame-parameter nil 'buffer-predicate 'my/buffer-predicate) + :hook (prog-mode . my/set-fill-column-80) (conf-mode . my/set-fill-column-80) diff --git a/server/server b/server/server index c3ff86d..33662ab 100644 --- a/server/server +++ b/server/server @@ -1,2 +1,2 @@ -127.0.0.1:51313 10629 +127.0.0.1:51313 3161 phahw2ohVoh0oopheish7IVie9desh8aequeenei3uo8wahShe%thuadaeNa4ieh \ No newline at end of file