From 43b40c4b152a5d7113e3ee591f9f91a342c8fbac Mon Sep 17 00:00:00 2001 From: Alex Kost Date: Thu, 27 Aug 2015 22:47:26 +0300 Subject: emacs: Add 'guix-graph-type-names'. * emacs/guix-main.scm: Use (guix scripts graph) module. (graph-type-names): New procedure. * emacs/guix-base.el (guix-graph-type-names): New function. --- emacs/guix-main.scm | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'emacs/guix-main.scm') diff --git a/emacs/guix-main.scm b/emacs/guix-main.scm index 2c5b0baa65..191aa8d5cf 100644 --- a/emacs/guix-main.scm +++ b/emacs/guix-main.scm @@ -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) -- cgit 1.4.1