From a1a2ed534278b968767727485f84e5957c039c23 Mon Sep 17 00:00:00 2001 From: Andy Wingo Date: Sat, 23 Jul 2011 17:50:37 +0200 Subject: more work on "guild list" * module/scripts/: Add %summary entries, and in many cases, %include-in-guild-list entries to inhibit a script from appearing in "guild list". Update list.scm to respect this new variable. --- module/scripts/read-scheme-source.scm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'module/scripts/read-scheme-source.scm') diff --git a/module/scripts/read-scheme-source.scm b/module/scripts/read-scheme-source.scm index b48a88f9b..1bca6a4c4 100644 --- a/module/scripts/read-scheme-source.scm +++ b/module/scripts/read-scheme-source.scm @@ -1,6 +1,6 @@ ;;; read-scheme-source --- Read a file, recognizing scheme forms and comments -;; Copyright (C) 2001, 2006 Free Software Foundation, Inc. +;; Copyright (C) 2001, 2006, 2011 Free Software Foundation, Inc. ;; ;; This program is free software; you can redistribute it and/or ;; modify it under the terms of the GNU Lesser General Public License @@ -91,6 +91,9 @@ quoted? clump)) +(define %include-in-guild-list #f) +(define %summary "Print a parsed representation of a Scheme file.") + ;; Try to figure out what FORM is and its various attributes. ;; Call proc NOTE! with key (a symbol) and value. ;; -- cgit v1.2.3