Tweaks for c88237.

git-svn-id: https://svn.r-project.org/R/trunk@88244 00db46b3-68df-0310-9c12-caf00c1e9a41

Author: hornik

src/library/tools/R/license.R

@@ -614,7 +614,9 @@ function(x)
                                stringsAsFactors = FALSE)
         }
 
-        spdx <- paste(unique(unlist(lapply(expansions, `[[`, "SPDX"),
+        spdx <- paste(unique(unlist(lapply(expansions,
+                                           function(e)
+                                               sort(e[["SPDX"]])),
                                     use.names = FALSE)),
                       collapse = " OR ")
         ## Replace expansions by their labels from the license db.