# HG changeset patch # User Richard M. Stallman # Date 1051969719 0 # Node ID 1b22075b3bb50aa319a0222b3e7c7508c4c0680a # Parent ef4c56e5906bb2c44c695b532c37407a08f41a2a (filesets-data): Add another defvar. (filesets-verbosity): Doc fix. diff -r ef4c56e5906b -r 1b22075b3bb5 lisp/filesets.el --- a/lisp/filesets.el Fri May 02 22:02:11 2003 +0000 +++ b/lisp/filesets.el Sat May 03 13:48:39 2003 +0000 @@ -3,6 +3,7 @@ ;; Copyright (C) 2002 Free Software Foundation, Inc. ;; Author: Thomas Link +;; 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 @@ 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 @@ (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 @@ (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 @@ :set (function filesets-set-default) :type 'integer :group 'filesets) - - + ;;; Emacs compatibility (eval-and-compile (if filesets-running-xemacs