Prepare ANSI table reset.

members-base.scm

@@ -35,6 +35,7 @@
   list-members-nicks
   members-base-stats
   print-members-base-info
+  print-members-base-table
   print-members-base-stats
   get-free-members-ids
   print-members-ids-stats
@@ -63,7 +64,8 @@
 	 period
 	 month
 	 configuration
-	 progress)
+	 progress
+	 table)
  
  ;; Gets all files and symbolic links from given directory. The
  ;; symbolic links are represented by cons cells with car being the
@@ -332,6 +334,10 @@
 	       (member-records->string (sort invalid-mrs member<?) "~N (~I)")
 	       a:default)))))
 
+ ;; Prints nicely aligned members base info
+ (define (print-members-base-table mb)
+   (print "TEST"))
+
  ;; Prints the stats in format used by gnuplot.
  (define (print-members-base-stats ms)
    (let ((keys (car ms))