summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorStefan Kangas <stefankangas@gmail.com>2022-10-30 14:30:56 +0100
committerStefan Kangas <stefankangas@gmail.com>2022-10-30 14:32:24 +0100
commit2fa8f1b77a66a486d67aaa0ced062b1eb4ff9f88 (patch)
treedd95b45fe4662b9f54ed7768f15785a43665c9c8 /lisp
parentb1fa7974bb416b3b44234966ff14c6a4719d7997 (diff)
downloademacs-2fa8f1b77a66a486d67aaa0ced062b1eb4ff9f88.tar.gz
emacs-2fa8f1b77a66a486d67aaa0ced062b1eb4ff9f88.tar.bz2
emacs-2fa8f1b77a66a486d67aaa0ced062b1eb4ff9f88.zip
elide-head: Make trailing "/" in URL optional
* lisp/elide-head.el (elide-head-headers-to-hide): Make trailing "/" in the gnu.org URL optional for the GPL. * test/lisp/elide-head-tests.el (elide-head--test-headers-to-hide/gpl3-5): New test.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/elide-head.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/elide-head.el b/lisp/elide-head.el
index 90bf1fe35b5..75a3612df91 100644
--- a/lisp/elide-head.el
+++ b/lisp/elide-head.el
@@ -53,8 +53,8 @@
`(;; GNU GPL
("is free software[:;] you can redistribute it" .
,(rx (or (seq "If not, see " (? "<")
- "http" (? "s") "://www.gnu.org/licenses/"
- (? ">") (? " "))
+ "http" (? "s") "://www.gnu.org/licenses"
+ (? "/") (? ">") (? " "))
(seq "Boston, MA " (? " ")
"0211" (or "1-1307" "0-1301")
(or " " ", ") "USA")