branch: elpa/xah-fly-keys commit d982449056ca43a4934186b9066199a384baf77e Author: Xah Lee <x...@xahlee.org> Commit: Xah Lee <x...@xahlee.org>
xah-toggle-read-novel-mode removed. no belong. --- xah-fly-keys.el | 31 +++---------------------------- 1 file changed, 3 insertions(+), 28 deletions(-) diff --git a/xah-fly-keys.el b/xah-fly-keys.el index f0d3af0b45..c9043438a6 100644 --- a/xah-fly-keys.el +++ b/xah-fly-keys.el @@ -4,7 +4,7 @@ ;; Author: Xah Lee ( http://xahlee.info/ ) ;; Maintainer: Xah Lee <x...@xahlee.org> -;; Version: 26.11.20250418094205 +;; Version: 26.12.20250419130746 ;; Created: 2013-09-10 ;; Package-Requires: ((emacs "28.3")) ;; Keywords: convenience, vi, vim, ergoemacs, keybinding @@ -1073,31 +1073,6 @@ Version: 2025-03-25" (match-beginning 0) (match-end 0)) 'face 'highlight))))) -(defun xah-toggle-read-novel-mode () - "Setup current frame to be suitable for reading long novel/article text. -• Set frame width to 70 -• Line wrap at word boundaries. -• Line spacing is increased. -• Proportional width font is used. -Call again to toggle back. - -URL `http://xahlee.info/emacs/emacs/emacs_novel_reading_mode.html' -Created: 2019-01-30 -Version: 2021-01-16" - (interactive) - (if (eq (frame-parameter (selected-frame) 'width) 70) - (progn - (set-frame-parameter (selected-frame) 'width 106) - (variable-pitch-mode 0) - (setq line-spacing nil) - (setq word-wrap nil)) - (progn - (set-frame-parameter (selected-frame) 'width 70) - (variable-pitch-mode 1) - (setq line-spacing 0.5) - (setq word-wrap t))) - (redraw-frame (selected-frame))) - (defun xah-fill-or-unfill () "Reformat current block or selection to short/long line. First call will break into multiple short lines. Repeated call toggles between short and long lines. @@ -3567,8 +3542,8 @@ Version: 2024-04-22" ("n c" . toggle-case-fold-search) ("n d" . display-line-numbers-mode) ("n e" . eshell) - ("n f" . nil) - ("n g" . xah-toggle-read-novel-mode) + ;; ("n f" . nil) + ;; ("n g" . nil) ("n h" . widen) ("n i" . make-frame-command) ("n j" . flyspell-buffer)