#!/usr/bin/guile
!#

(import (sph) (sph list) (sph test))

(let
  (s
    (test-settings-default-custom path-search (string-append (getcwd) "/modules")
      reporter-name (q compact)
      ;only (list-q (test module sph-cms controller content))
      ))
  (test-execute-modules-by-prefix #:settings s (q (test module sph-cms))))