emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 9e7191048b: elide-head: Add support for modified BSD license


From: Stefan Kangas
Subject: master 9e7191048b: elide-head: Add support for modified BSD license
Date: Sun, 2 Jan 2022 13:27:19 -0500 (EST)

branch: master
commit 9e7191048b56368a2d8bf3792f67f7b468d18eca
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    elide-head: Add support for modified BSD license
    
    * lisp/elide-head.el (elide-head-headers-to-hide): Add support for
    the modified BSD license (3-clause BSD).
---
 lisp/elide-head.el | 14 ++++++++++----
 1 file changed, 10 insertions(+), 4 deletions(-)

diff --git a/lisp/elide-head.el b/lisp/elide-head.el
index 30772fa514..79af01bd48 100644
--- a/lisp/elide-head.el
+++ b/lisp/elide-head.el
@@ -50,16 +50,22 @@
   :group 'tools)
 
 (defcustom elide-head-headers-to-hide
-  `(("is free software[:;] you can redistribute it" . ; GNU boilerplate
+  `(;; GNU GPL
+    ("is free software[:;] you can redistribute it" .
      "\\(If not, see <https?://www\\.gnu\\.org/licenses/>\\|\
 Boston, MA 0211\\(1-1307\\|0-1301\\), USA\\|\
 675 Mass Ave, Cambridge, MA 02139, USA\\)\\.")
+    ;; FreeBSD license
     (,(rx (or "The Regents of the University of California.  All rights 
reserved."
               "Redistribution and use in source and binary"))
-     . "THE POSSIBILITY OF SUCH DAMAGE\\.") ; BSD
+     . "THE POSSIBILITY OF SUCH DAMAGE\\.")
+    ;; X11 and Expat
     ("Permission is hereby granted, free of charge" .
-     ,(rx (or "authorization from the X Consortium."           ; X11
-              "THE USE OR OTHER DEALINGS IN THE SOFTWARE.")))) ; Expat
+     ,(rx (or "authorization from the X Consortium."          ; X11
+              "THE USE OR OTHER DEALINGS IN THE SOFTWARE."))) ; Expat
+    ;; Modified BSD license (3-clause)
+    ("Redistribution and use in source and binary forms"
+     . "POSSIBILITY OF SUCH DAMAGE\\."))
   "Alist of regexps defining start and end of text to elide.
 
 The cars of elements of the list are searched for in order.  Text is



reply via email to

[Prev in Thread] Current Thread [Next in Thread]