From 21794a4dfa857a770155b9e0c59af885e0d5756c Mon Sep 17 00:00:00 2001
From: BardofSprites <89086143+BardofSprites@users.noreply.github.com>
Date: Fri, 26 Dec 2025 19:40:49 -0500
Subject: literate configuration

---
 bard-elisp/bard-ryo.el | 49 -------------------------------------------------
 1 file changed, 49 deletions(-)
 delete mode 100644 bard-elisp/bard-ryo.el

(limited to 'bard-elisp/bard-ryo.el')

diff --git a/bard-elisp/bard-ryo.el b/bard-elisp/bard-ryo.el
deleted file mode 100644
index 782aab8..0000000
--- a/bard-elisp/bard-ryo.el
+++ /dev/null
@@ -1,49 +0,0 @@
-(defun bard/ryo-insert-p ()
-  "Return t if `ryo-modal-mode` is not bound or not active."
-  (not (bound-and-true-p ryo-modal-mode)))
-
-(defun xah-beginning-of-line-or-block ()
-  "Move cursor to beginning of indent or line, end of previous block, in that order.
-
-If `visual-line-mode' is on, beginning of line means visual line.
-
-URL `http://xahlee.info/emacs/emacs/emacs_move_by_paragraph.html'
-Created: 2018-06-04
-Version: 2024-10-30"
-  (interactive)
-  (let ((xp (point)))
-    (if (or (eq (point) (line-beginning-position))
-            (eq last-command this-command))
-        (when (re-search-backward "\n[\t\n ]*\n+" nil :move)
-          (skip-chars-backward "\n\t ")
-          ;; (forward-char)
-          )
-      (if visual-line-mode
-          (beginning-of-visual-line)
-        (if (eq major-mode 'eshell-mode)
-            (progn
-              (declare-function eshell-bol "esh-mode.el" ())
-              (eshell-bol))
-          (back-to-indentation)
-          (when (eq xp (point))
-            (beginning-of-line)))))))
-
-(defun xah-end-of-line-or-block ()
-  "Move cursor to end of line or next block.
-
-• When called first time, move cursor to end of line.
-• When called again, move cursor forward by jumping over any sequence of whitespaces containing 2 blank lines.
-• if `visual-line-mode' is on, end of line means visual line.
-
-URL `http://xahlee.info/emacs/emacs/emacs_move_by_paragraph.html'
-Created: 2018-06-04
-Version: 2024-10-30"
-  (interactive)
-  (if (or (eq (point) (line-end-position))
-          (eq last-command this-command))
-      (re-search-forward "\n[\t\n ]*\n+" nil :move)
-    (if visual-line-mode
-        (end-of-visual-line)
-      (end-of-line))))
-
-(provide 'bard-ryo)
-- 
cgit v1.2.3