diff options
author | 2019-02-26 00:53:39 -0800 | |
---|---|---|
committer | 2019-02-26 00:53:39 -0800 | |
commit | 3ba44832c75f7bbee821d02ebc3a3de7b912de15 (patch) | |
tree | 12a013a06dfe633476b0c99c3877585c871d936b /emacs/.emacs.d/init/oni-lui-init.el | |
parent | d08b398ff1f536141f2c2668c47e2eabb888413b (diff) | |
download | new-dotfiles-3ba44832c75f7bbee821d02ebc3a3de7b912de15.tar.gz new-dotfiles-3ba44832c75f7bbee821d02ebc3a3de7b912de15.zip |
Move LUI and Circe configs to emacs-config
Diffstat (limited to 'emacs/.emacs.d/init/oni-lui-init.el')
-rwxr-xr-x | emacs/.emacs.d/init/oni-lui-init.el | 49 |
1 files changed, 0 insertions, 49 deletions
diff --git a/emacs/.emacs.d/init/oni-lui-init.el b/emacs/.emacs.d/init/oni-lui-init.el deleted file mode 100755 index 290f824..0000000 --- a/emacs/.emacs.d/init/oni-lui-init.el +++ /dev/null @@ -1,49 +0,0 @@ -;;; oni-lui-init.el --- Linewise User Interface configuration -*- lexical-binding: t; -*- - -;; Copyright (C) 2018 Tom Willemse - -;; Author: Tom Willemse <tom@ryuslash.org> -;; Keywords: local - -;; This program is free software; you can redistribute it and/or modify -;; it under the terms of the GNU General Public License as published by -;; the Free Software Foundation, either version 3 of the License, or -;; (at your option) any later version. - -;; This program is distributed in the hope that it will be useful, -;; but WITHOUT ANY WARRANTY; without even the implied warranty of -;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -;; GNU General Public License for more details. - -;; You should have received a copy of the GNU General Public License -;; along with this program. If not, see <https://www.gnu.org/licenses/>. - -;;; Commentary: - -;; My customizations to the Linewise User Interface. Used by both -;; Circe and emacs-slack. - -;;; Code: - -(require 'lui) - -(defun oni-lui-init--set-margin-width () - "Set the margin width to 5." - (setq right-margin-width 5)) - -(defun oni-lui-init--set-prompt-wrap-prefix () - "Set the wrap prefix to two spaces." - (setq wrap-prefix " ")) - -(with-eval-after-load 'lui - (setq lui-time-stamp-position 'right-margin - lui-time-stamp-format "%H:%M")) - -(add-hook 'lui-mode-hook #'oni-lui-init--set-margin-width) -(add-hook 'lui-mode-hook #'oni-lui-init--set-prompt-wrap-prefix) -(add-hook 'lui-mode-hook 'visual-line-mode) - -(setq lui-fill-type nil) - -(provide 'oni-lui-init) -;;; oni-lui-init.el ends here |