(define-module (ruther modules)
  #:use-module (guix modules)
  #:use-module (ice-9 match)

  #:re-export (missing-dependency-error?
               missing-dependency-module
               missing-dependency-search-path

               file-name->module-name
               module-name->file-name

               source-module-dependencies
               source-module-closure
               live-module-closure
               guix-module-name?)
  #:export (ruther-module-name?))

(define (ruther-module-name? name)
  "Return true if NAME (a list of symbols) denotes a Guix module or Ruther module."
  (match name
    (('guix _ ...) #t)
    (('gnu _ ...) #t)
    (('ruther _ ...) #t)
    (_ #f)))