mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-15 10:30:25 -08:00
(filesets-data): Add another defvar.
(filesets-verbosity): Doc fix.
This commit is contained in:
parent
199a0cb9b3
commit
9f243b0d3d
1 changed files with 14 additions and 7 deletions
|
|
@ -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
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue