(filesets-data): Add another defvar.

(filesets-verbosity): Doc fix.

1 files changed, 14 insertions, 7 deletions

diff --git a/lisp/filesets.el b/lisp/filesets.el
index 384872814de..489a1035499 100644
--- a/lisp/filesets.el
+++ b/lisp/filesets.el
@@ -3,6 +3,7 @@
 ;; Copyright (C) 2002 Free Software Foundation, Inc.
 
 ;; Author: Thomas Link <t.link@gmx.at>
+;; Maintainer: FSF
 ;; Keywords: filesets convenience
 
 ;; This file is part of GNU Emacs.
@@ -66,6 +67,13 @@
 
 ;;- better handling of different customization scenarios
 
+;; Data gathering should be better separated from building the menu
+;; so that one could (1) use filesets without installing the menu
+;; and (2) create new "frontends" to speedbar and others.
+
+;; The functionality to call external viewers should be isolated in
+;; an extra package and possibly integrated with the MIME
+;; handling.
 
 ;;; Credits:
 
@@ -119,8 +127,8 @@ ignored.")
 Is buffer local variable.")
 
 (defvar filesets-verbosity 1
-  "An integer defining the level of verbosity. 0 means no messages
-at all.")
+  "An integer defining the level of verbosity.
+0 means no messages at all.")
 
 (defvar filesets-menu-ensure-use-cached
   (and filesets-running-xemacs
@@ -264,6 +272,8 @@ key is supported."
     (setq filesets-has-changed-flag t)))
 ;    (filesets-reset-fileset nil t)))
 
+(defvar filesets-data)
+
 (defun filesets-data-set-default (sym val)
   "Set the default for `filesets-data'."
   (if filesets-menu-use-cached-flag
@@ -280,9 +290,7 @@ key is supported."
 	(dolist (x modified-filesets)
 	  (filesets-reset-fileset (car x))))))
   (filesets-set-default sym val))
-
-
-
+
 ;;; configuration
 (defgroup filesets nil
   "The fileset swapper."
@@ -1057,8 +1065,7 @@ defined in `filesets-ingroup-patterns'."
   :set (function filesets-set-default)
   :type 'integer
   :group 'filesets)
-
-
+
 ;;; Emacs compatibility
 (eval-and-compile
   (if filesets-running-xemacs