Function: kcell-view:next-kcell

kcell-view:next-kcell is a byte-compiled function defined in kview.el.

Signature

(kcell-view:next-kcell &optional VISIBLE-P LBL-SEP-LEN)

Documentation

Move to point holding the kcell property within next cell of the current kview.

With optional VISIBLE-P, consider only visible cells. Return t unless no next cell.

Source Code

;; Defined in ~/.emacs.d/elpa/hyperbole-20260414.325/kotl/kview.el
(defun kcell-view:next-kcell (&optional visible-p lbl-sep-len)
  "Move to point holding the kcell property within next cell of the current kview.
With optional VISIBLE-P, consider only visible cells.  Return t
unless no next cell."
  (let* ((opoint (point))
	 (pos opoint))
    (while (and (setq pos (kproperty:next-single-change pos 'kcell))
		(or (not (kproperty:get pos 'kcell))
		    (and visible-p (kcell-view:invisible-p pos lbl-sep-len)))))
    (if (and pos (/= pos opoint) (kproperty:get pos 'kcell)
	     (if visible-p (not (kcell-view:invisible-p pos lbl-sep-len)) t))
	(progn (goto-char pos) t))))