b21c6a2002-05-31Martin Nilsson #pike __REAL_VERSION__
1cbb892011-04-25Martin Stjernholm // $Id$
b21c6a2002-05-31Martin Nilsson  //! 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" });
b5116e2002-06-01Martin Nilsson  array list = map(licenses, lambda(string lic) { return lic + " (" + Tools.Legal.License[lic]->get_name() + ")"; }); string ret = sprintf("%-=80s\n",
b21c6a2002-05-31Martin Nilsson  "The Pike source is distributed under " +
b5116e2002-06-01Martin Nilsson  String.implode_nicely(list) + ". "
b21c6a2002-05-31Martin Nilsson  "These licenses are listed in order below."); foreach(licenses, string license)
b5116e2002-06-01Martin Nilsson  ret += "\n\n\f\n" + Tools.Legal.License[license]->get_text();
b21c6a2002-05-31Martin Nilsson  return ret; }