2 files changed, 9 insertions(+), 0 deletions(-)

M emacs/guix-base.el
M emacs/guix-main.scm

@@ 183,6 183,10 @@ If PATH is relative, it is considered to be relative to
 
 ;;; Receivable lists of packages, lint checkers, etc.
 
+(guix-memoized-defun guix-graph-type-names ()
+  "Return a list of names of available graph node types."
+  (guix-eval-read (guix-make-guile-expression 'graph-type-names)))
+
 (guix-memoized-defun guix-lint-checker-names ()
   "Return a list of names of available lint checkers."
   (guix-eval-read (guix-make-guile-expression 'lint-checker-names)))

@@ 57,6 57,7 @@
  (guix licenses)
  (guix utils)
  (guix ui)
+ (guix scripts graph)
  (guix scripts lint)
  (guix scripts package)
  (guix scripts pull)


@@ 932,6 933,10 @@ GENERATIONS is a list of generation numbers."
 
 ;;; Lists of packages, lint checkers, etc.
 
+(define (graph-type-names)
+  "Return a list of names of available graph node types."
+  (map node-type-name %node-types))
+
 (define (lint-checker-names)
   "Return a list of names of available lint checkers."
   (map (lambda (checker)