From 3e7bb0cc182b2d062d8234f4845c33372480b3db Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Mon, 6 Sep 2021 12:51:48 -0500
Subject: Reorganize eshell config

---
 eshell.el | 70 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 70 insertions(+)
 create mode 100644 eshell.el

(limited to 'eshell.el')

diff --git a/eshell.el b/eshell.el
new file mode 100644
index 0000000..dc96b8e
--- /dev/null
+++ b/eshell.el
@@ -0,0 +1,70 @@
+;;; eshell.el --- eshell-specific configuration      -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021  Case Duckworth
+
+;; Author: Case Duckworth <acdw@acdw.net>
+;; Keywords: 
+
+;; 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:
+
+;; Much like ~/.emacs.d/gnus.el, this is eshell-specific configuration that's
+;; loaded whenever `eshell' is loaded.
+
+;;; Code:
+
+(require 'setup)
+
+;;; Environment
+(setenv "PAGER" "cat")
+
+;;; Aliases
+
+(dolist (definition '(("e" . "find-file $1")
+                      ("ff" . "find-file $1")
+                      ("emacs" . "find-file $1")
+                      ("ee" . "find-file-other-window $1")))
+  (eshell/alias (car definition) (cdr definition)))
+
+;;; Functions
+
+;;; Extra eshell packages
+
+(setup (:straight esh-autosuggest)
+  (:hook-into eshell-mode))
+
+(setup (:straight esh-help)
+  (require 'esh-help)
+  (setq-local eldoc-documentation-function #'esh-help-eldoc-command))
+
+(setup (:straight eshell-syntax-highlighting)
+  (eshell-syntax-highlighting-global-mode +1))
+
+(setup (:straight-if fish-completion
+                     (executable-find "fish"))
+  (:autoload global-fish-completion-mode)
+  (global-fish-completion-mode +1))
+
+;;; Miscellaneous
+
+;; Fix modeline
+(when (boundp 'simple-modeline--mode-line)
+  (setq mode-line-format '(:eval simple-modeline--mode-line)))
+
+;;; Tell Emacs our customizations are loaded.
+(defvar eshell-customizations-loaded t
+  "Whether eshell's customizations have been loaded yet.")
+
+;;; eshell.el ends here
-- 
cgit 1.4.1-21-gabe81