Branch: Tag:

2002-05-31

2002-05-31 16:20:18 by Martin Nilsson <mani@lysator.liu.se>

Preparations for relicsensing.

Rev: lib/modules/Tools.pmod/Legal.pmod/Copyright.pmod:1.1
Rev: lib/modules/Tools.pmod/Legal.pmod/License.pmod/GPL.pmod:1.1
Rev: lib/modules/Tools.pmod/Legal.pmod/License.pmod/LGPL.pmod:1.1
Rev: lib/modules/Tools.pmod/Legal.pmod/License.pmod/MPL.pmod:1.1
Rev: lib/modules/Tools.pmod/Legal.pmod/License.pmod/gpl.txt:1.1
Rev: lib/modules/Tools.pmod/Legal.pmod/License.pmod/lgpl.txt:1.1
Rev: lib/modules/Tools.pmod/Legal.pmod/License.pmod/module.pmod:1.1
Rev: lib/modules/Tools.pmod/Legal.pmod/License.pmod/mpl.txt:1.1

1: + #pike __REAL_VERSION__    -  + // $Id: module.pmod,v 1.1 2002/05/31 16:20:18 nilsson Exp $ +  + //! Returns all the licenses as a string, suitable for + //! saving as a file. + string get_text() { +  array licenses = sort(indices(Tools.Legal.License)) - +  ({ "get_text", "module" }); +  string ret = sprintf("%-=80s\n\n", +  "The Pike source is distributed under " + +  String.implode_nicely(licenses) + ". " +  "These licenses are listed in order below."); +  foreach(licenses, string license) +  ret += "\n\f" + Tools.Legal.License[license]->get_text(); +  +  return ret; + }   Newline at end of file added.