diff options
author | Tom Willemse | 2019-02-26 00:51:53 -0800 |
---|---|---|
committer | Tom Willemse | 2019-02-26 00:51:53 -0800 |
commit | f313ba9c6aa869b2f615a23b97fd2c91024236e3 (patch) | |
tree | 33ca736adebf8ac9b2bace1dbfab3362c73fc84b /oni-lui.el | |
parent | 30d84bb0dacb0ce8605d3838d356b32eb5d19820 (diff) | |
download | emacs-config-f313ba9c6aa869b2f615a23b97fd2c91024236e3.tar.gz emacs-config-f313ba9c6aa869b2f615a23b97fd2c91024236e3.zip |
Add oni-circe and oni-lui
Diffstat (limited to 'oni-lui.el')
-rw-r--r-- | oni-lui.el | 52 |
1 files changed, 52 insertions, 0 deletions
diff --git a/oni-lui.el b/oni-lui.el new file mode 100644 index 0000000..2c22eb4 --- /dev/null +++ b/oni-lui.el @@ -0,0 +1,52 @@ +;;; oni-lui.el --- LUI configuration -*- lexical-binding: t; -*- + +;; Copyright (C) 2019 Tom Willemse + +;; Author: Tom Willemse <tom@ryuslash.org> +;; Keywords: local +;; Version: 20190226004504 +;; Package-Requires: (circe) + +;; 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: + +;; Configuration for the Linewise User Interface package. + +;;; Code: + +(require 'lui) + +(defun oni-lui--set-margin-width () + "Set the margin width to 5." + (setq right-margin-width 5)) + +(defun oni-lui--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--set-margin-width) +(add-hook 'lui-mode-hook #'oni-lui--set-prompt-wrap-prefix) +(add-hook 'lui-mode-hook 'visual-line-mode) + +(setq lui-fill-type nil) + +;;;###autoload(with-eval-after-load 'lui (require 'oni-lui)) + +(provide 'oni-lui) +;;; oni-lui.el ends here |