From 754bbf7a25a8dda49b5d08ef0d0443bbf5af0e36 Mon Sep 17 00:00:00 2001
From: Craig Jennings <c@cjennings.net>
Date: Sun, 7 Apr 2024 13:41:34 -0500
Subject: new repository

---
 modules/modeline-config.el | 36 ++++++++++++++++++++++++++++++++++++
 1 file changed, 36 insertions(+)
 create mode 100644 modules/modeline-config.el

(limited to 'modules/modeline-config.el')

diff --git a/modules/modeline-config.el b/modules/modeline-config.el
new file mode 100644
index 00000000..cea31660
--- /dev/null
+++ b/modules/modeline-config.el
@@ -0,0 +1,36 @@
+;;; modeline-config --- Modeline Settings -*- lexical-binding: t; -*-
+;; author: Craig Jennings <c@cjennings.net>
+
+;;; Commentary:
+;; I'm currently working on refactoring and bug fixing for
+;; tautologyclub/feebleline. In transition, I use moodline. Both are good, but I
+;; prefer the slimmer modeline which just uses the echo area.
+
+;; This code allows me to load and test feebleline when it's working directory
+;; exists. Otherwise, it loads and configures moodline.
+
+;;; Code:
+
+(defvar feebleline-working-directory "~/code/feebleline"
+  "The working directory for the feebleline mode line.")
+
+;; --------------------------------- Feebleline --------------------------------
+;; ultrathin simple modeline. adds only useful info to echo area.
+
+(use-package feebleline
+  :if (file-readable-p feebleline-working-directory)
+  :load-path feebleline-working-directory
+  :config
+  (feebleline-mode))
+
+;; ---------------------------------- Moodline ---------------------------------
+;; a sleek and minimalistic modeline.
+
+(use-package mood-line
+  :unless (file-readable-p feebleline-working-directory)
+  :config
+  (setq mood-line-glyph-alist mood-line-glyphs-ascii)
+  (mood-line-mode))
+
+(provide 'modeline-config)
+;;; modeline-config.el ends here
-- 
cgit v1.2.3