Move the license text to texts as well.

src/bbstool.scm

@@ -4,27 +4,6 @@
 ;; Brmburo system - members management tool.
 ;;
 
-;; The license of this file and of the whole suite.
-(define license-text "ISC License
-
-Copyright 2023 Brmlab, z.s.
-Dominik Pantůček <dominik.pantucek@trustica.cz>
-
-Permission to use, copy, modify, and/or distribute this software
-for any purpose with or without fee is hereby granted, provided
-that the above copyright notice and this permission notice appear
-in all copies.
-
-THE SOFTWARE IS PROVIDED \"AS IS\" AND THE AUTHOR DISCLAIMS ALL
-WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED
-WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE
-AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR
-CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS
-OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT,
-NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN
-CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
-")
-
 (import (chicken repl)
 	testing
 	listing
@@ -51,10 +30,11 @@ CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 	bank-account
 	mailman
 	util-set-list
-	util-parser)
+	util-parser
+	texts)
 
 ;; Print banner
-(print "bbstool 0.9.3 (c) 2023 Brmlab, z.s.")
+(print "HackerBase 0.9.3 (c) 2023 Brmlab, z.s.")
 (newline)
 
 ;; Command-line options and configurable parameters
@@ -83,7 +63,9 @@ CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
      (newline)
      (exit 0))
  (-license () "Show licensing terms"
-	   (print license-text)
+	   (print banner)
+	   (newline)
+	   (print license)
 	   (exit 0))
  ""
  "Configuration options:"