guile-termenv/termenv/hyperlink.scm

(define-module (termenv hyperlink)
  #:use-module (termenv)
  #:export (hyperlink))

(define (hyperlink port link name)
  (format port (string-append %OSC "8;;" link %ST name %OSC "8;;" %ST)))