Bump to dev version.

src/mailman3.scm

@@ -33,11 +33,13 @@
   )
 
  (import scheme
+	 (chicken base)
 	 (chicken string)
 	 (chicken sort)
 	 (chicken format)
 	 configuration
-	 util-io)
+	 util-io
+	 util-list)
 
  ;; Runs the mailman3 binary with any arguments and returns the lines
  ;; produced on stdout
@@ -52,7 +54,14 @@
 
  ;; Returns the list of available lists
  (define (list-mailman3-lists)
-   (get-mailman3-output-lines "lists" "-q"))
+   (filter
+    identity
+    (map (lambda (line)
+	   (let ((sline (string-split line "@")))
+	     (if (null? sline)
+		 #f
+		 (car sline))))
+	 (get-mailman3-output-lines "lists" "-q"))))
 
  ;; Returns the list of members of given list
  (define (list-mailman3-list-members lst)

src/texts.scm

@@ -39,7 +39,7 @@
 	 (chicken format))
 
  ;; Short banner
- (define banner-line "HackerBase 1.8 (c) 2023 Brmlab, z.s.")
+ (define banner-line "HackerBase 1.9-dev (c) 2023 Brmlab, z.s.")
 
  ;; Banner source with numbers for ANSI CSI SGR
  (define banner-source "