Function: hpath:www-at-p

hpath:www-at-p is a byte-compiled function defined in hpath.el.

Signature

(hpath:www-at-p &optional INCLUDE-START-AND-END-P)

Documentation

Return a world-wide-web link reference that point is within or nil.

The url may lack a leading protocol; it will be inferred. With optional INCLUDE-START-AND-END-P non-nil, returns list of:
  (link-string begin-position end-position).

Source Code

;; Defined in ~/.emacs.d/elpa/hyperbole-20260414.325/hpath.el
(defun hpath:www-at-p (&optional include-start-and-end-p)
  "Return a world-wide-web link reference that point is within or nil.
The url may lack a leading protocol; it will be inferred.
With optional INCLUDE-START-AND-END-P non-nil, returns list of:
  (link-string begin-position end-position)."
  (save-excursion
    (skip-chars-backward "^\[ \t\n\r\f\"`'|\(\{<")
    (cond ((not include-start-and-end-p)
	   (hpath:url-at-p))
	  ((or (looking-at hpath:url-regexp) (looking-at hpath:url-regexp2)
	       (looking-at hpath:url-regexp3))
	   (goto-char (match-end hpath:url-grpn))
	   (skip-chars-backward ".,?#!*()")
	   (list (buffer-substring-no-properties (match-beginning hpath:url-grpn) (point))
		 (match-beginning hpath:url-grpn)
		 (point))))))