New use_lgpl_license() (r-lib#472)

Chris-Engelhardt · Nov 24, 2018 · 9d66d04 · 9d66d04
1 parent 6fee375
commit 9d66d04
Show file tree

Hide file tree

Showing 5 changed files with 519 additions and 0 deletions.
diff --git a/NAMESPACE b/NAMESPACE
@@ -53,6 +53,7 @@ export(use_github)
 export(use_github_labels)
 export(use_github_links)
 export(use_gpl3_license)
+export(use_lgpl_license)
 export(use_lifecycle_badge)
 export(use_logo)
 export(use_mit_license)

diff --git a/NEWS.md b/NEWS.md
@@ -6,6 +6,8 @@
 
 * `proj_get()` and `proj_set()` no longer have a `quiet` argument. The user-facing message about setting a project is now under the same control as other messages, i.e. `getOption("usethis.quiet", default = FALSE)` (#441).
 
+* New `use_lgpl_license()` (#448, @krlmlr).
+
 ## Dependency changes
 
 withr moves from Suggests to Imports.

diff --git a/R/license.R b/R/license.R
@@ -57,6 +57,16 @@ use_gpl3_license <- function(name = find_name()) {
   use_license_template("GPL-3", name)
 }
 
+#' @rdname licenses
+#' @export
+use_lgpl_license <- function(name = find_name()) {
+  force(name)
+  check_is_package("use_lgpl_license()")
+
+  use_description_field("License", "LGPL (>= 2.1)", overwrite = TRUE)
+  use_license_template("LGPL-2.1", name)
+}
+
 #' @rdname licenses
 #' @export
 use_apl2_license <- function(name = find_name()) {