define-command -override url-open %{
    evaluate-commands -save-regs 'ab' %{
        set-register b 'https?://(www\.)?[-a-zA-Z0-9@:%._\+~#=]{1,256}\.[a-zA-Z0-9()]{1,6}\b([-a-zA-Z0-9()@:%_\+.~#?&//=]*)'
        execute-keys -draft '<a-a><a-w>s<c-r>b<ret>"ay'
        nop %sh{
            xdg-open "$kak_reg_a"
        }
        echo %reg{a}
    }
}