Function: hui-select-at-delimited-sexp-p

hui-select-at-delimited-sexp-p is a byte-compiled function defined in hui-select.el.

Signature

(hui-select-at-delimited-sexp-p)

Documentation

Return non-nil if at the start or on the end char of an sexpression.

Use hui-select-mark-delimited-sexp to select it.

Source Code

;; Defined in ~/.emacs.d/elpa/hyperbole-20260414.325/hui-select.el
(defun hui-select-at-delimited-sexp-p ()
  "Return non-nil if at the start or on the end char of an sexpression.
Use `hui-select-mark-delimited-sexp' to select it."
  (unless (eolp)
    (let ((syn-before (if (char-before) (char-syntax (char-before)) 0))
	  (syn-after  (if (char-after)  (char-syntax (char-after)) 0)))
      (or (and (/= syn-before ?\\) (or (= syn-after ?\() (= syn-after ?\))))
	  (and (= syn-before ?\)) (char-before (1- (point)))
	       (/= ?\\ (if (char-before (1- (point))) (char-syntax (char-before (1- (point)))) 0)))))))