diff --git a/stride.el b/stride.el index 456d0f7..9b13111 100644 --- a/stride.el +++ b/stride.el @@ -82,10 +82,11 @@ (plist-put eww-data :tries 1) (eval (second (stride-match)))))) +;; TODO: move function definition to stride-nav for more flexibility +;; when dealing with difficult sites. then eval the lisp here. + (defun stride-forward () - "Goes to next chapter if in view, else advances to next page. -TODO: move function definition to stride-nav for more flexibility -when dealing with difficult sites. then eval the lisp here." + "Goes to next chapter if in view, else advances to next page." (interactive) (move-to-window-line -1) (setq-local bottom (point)) @@ -104,7 +105,7 @@ when dealing with difficult sites. then eval the lisp here." (setq stride-mode-map (make-sparse-keymap)) (define-key stride-mode-map [?\s] 'stride-forward) -;; (define-key stride-mode-map (kbd "") 'stride-forward) +;; (define-key stride-mode-map (kbd "") 'stride-forward (define-minor-mode stride-mode "More intelligent space bar navigation."