Function: org-w3m-get-next-link-start

org-w3m-get-next-link-start is a byte-compiled function defined in ol-w3m.el.gz.

Signature

(org-w3m-get-next-link-start)

Documentation

Move cursor to the start of next link or image. Return point.

Source Code

;; Defined in /usr/src/emacs/lisp/org/ol-w3m.el.gz
(defun org-w3m-get-next-link-start ()
  "Move cursor to the start of next link or image.  Return point."
  (let (pos start-pos anchor-pos image-pos)
    (setq pos (setq start-pos (point)))
    (setq anchor-pos
          (catch 'reach
            (while (setq pos (next-single-property-change pos 'w3m-anchor-sequence))
              (when (get-text-property pos 'w3m-href-anchor)
                (throw 'reach pos)))))
    (setq pos start-pos)
    (setq image-pos
          (catch 'reach
            (while (setq pos (next-single-property-change pos 'w3m-image))
              (when (get-text-property pos 'w3m-image)
                (throw 'reach pos)))))
    (goto-char (min (or anchor-pos (point-max)) (or image-pos (point-max))))))