cran2deb: permit opensource.org references and the word 'see' in licenses.

git-svn-id: svn://svn.r-forge.r-project.org/svnroot/cran2deb@38 edb9625f-4e0d-4859-8d74-9fd3b1da38cb

diff --git a/pkg/trunk/cran2deb b/pkg/trunk/cran2deb
index 801cba698c95857bf7adb967a7bc1f3e3410b769..88c2c3d256f0fa6ccfd13237e3b5d5f7189ce97f 100755 (executable)
--- a/pkg/trunk/cran2deb
+++ b/pkg/trunk/cran2deb
@@ -234,12 +234,14 @@ is_acceptable_license <- function(license) {
     # uninteresting urls
     license = gsub('HTTP://WWW.GNU.ORG/[A-Z/._-]*','',license)
     license = gsub('HTTP://WWW.X.ORG/[A-Z/._-]*','',license)
+    license = gsub('HTTP://WWW.OPENSOURCE.ORG/[A-Z/._-]*','',license)
     # remove all punctuation
     license = gsub('[[:punct:]]+','',license)
     # remove any extra space introduced
     license = chomp(gsub('[[:space:]]+',' ',license))
     # redundant
     license = gsub('THE','',license)
+    license = gsub('SEE','',license)
     license = gsub('STANDARD','',license)
     license = gsub('LICEN[SC]E','',license)
     license = gsub('(GNU )?(GPL|GENERAL PUBLIC)','GPL',license)