Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-16 17:24:23 +00:00
Code Issues Projects Releases Packages Wiki Activity

Support HTTPS URLs in newsticker-add-url

Browse source 
* lisp/net/newst-backend.el (newsticker-add-url): Support HTTPS.
This commit is contained in:
Stefan Kangas 2023-10-25 14:34:15 +02:00
parent e76eaecbde
commit aa79a5fc0f
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/net/newst-backend.el
View file

@ -618,13 +618,13 @@ If URL is nil it is searched at point."
(end-of-line)
(and
(re-search-backward
"http://"
(rx "http" (? "s") "://")
(if (> (point) (+ (point-min) 100))
(- (point) 100)
(point-min))
t)
(re-search-forward
"http://[-a-zA-Z0-9&/_.]*"
(rx "http" (? "s") "://" (zero-or-more (any "-a-zA-Z0-9&/_.")))
(if (< (point) (- (point-max) 200))
(+ (point) 200)
(point-max))