From 757a6abf33e8c8d8508193fbc0848ebf7681d94d Mon Sep 17 00:00:00 2001 From: =?utf8?q?Pavel=20Jan=C3=ADk?= Date: Mon, 29 Apr 2002 08:48:34 +0000 Subject: [PATCH] (filesets-data): Doc fix. (filesets-running-xemacs): Define even when compiling. --- lisp/ChangeLog | 5 +++++ lisp/filesets.el | 50 +++++++++++++++++++++++++----------------------- 2 files changed, 31 insertions(+), 24 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 7cbd99b8cb6..36e8811eb07 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2002-04-29 Pavel Jan,Bm(Bk + + * filesets.el (filesets-data): Doc fix. + (filesets-running-xemacs): Define even when compiling. + 2002-04-29 Stefan Monnier * textmodes/fill.el (fill-context-prefix): Fix last change with diff --git a/lisp/filesets.el b/lisp/filesets.el index fe29dd66283..61284f942ae 100644 --- a/lisp/filesets.el +++ b/lisp/filesets.el @@ -2,10 +2,11 @@ ;; Copyright (C) 2002 Free Software Foundation, Inc. -;; Author: Thomas Link aka t.link (at gmx at) -;; Time-stamp: <2002-03-22> +;; Author: Thomas Link ;; Keywords: filesets convenience +;; This file is part of GNU Emacs. + ;; This program is free software; you can redistribute it and/or modify ;; it under the terms of the GNU General Public License as published by ;; the Free Software Foundation; either version 2, or (at your option) @@ -26,29 +27,29 @@ ;;; Commentary: -;;Define filesets, which can be opened or saved with the power one or -;;two mouse clicks only. A fileset is either a list of files, a file -;;pattern, a base directory and a search pattern (for files), or an -;;inclusion group (i.e. a base file including other files). +;; Define filesets, which can be opened or saved with the power one or +;; two mouse clicks only. A fileset is either a list of files, a file +;; pattern, a base directory and a search pattern (for files), or an +;; inclusion group (i.e. a base file including other files). -;;Usage: 1. Put (require 'filesets) into your start-up file. 2. Type -;;M-x filesets-edit or choose "Edit Filesets" from the menu. 3. Save -;;your customizations. +;; Usage: 1. Put (require 'filesets) into your start-up file. 2. Type +;; M-x filesets-edit or choose "Edit Filesets" from the menu. 3. Save +;; your customizations. -;;Caveat: Fileset names have to be unique. +;; Caveat: Fileset names have to be unique. -;;Filesets.el adds a nifty filesets menu to your menubar. If you change -;;your filesets on the fly, don't forget to select "Save Filesets" from -;;the menu. +;; Filesets.el adds a nifty filesets menu to your menubar. If you change +;; your filesets on the fly, don't forget to select "Save Filesets" from +;; the menu. -;;Pressing on the first item in the submenu will open all files at once. -;;Define your own function, e.g. browse-url, for opening a fileset's -;;files. Or define external viewers for opening files with other -;;programs. See `filesets-external-viewers'. +;; Pressing on the first item in the submenu will open all files at once. +;; Define your own function, e.g. browse-url, for opening a fileset's +;; files. Or define external viewers for opening files with other +;; programs. See `filesets-external-viewers'. -;;BTW, if you close a fileset, files, which have been changed, will -;;be silently saved. Change this behaviour by setting -;;`filesets-save-buffer-fn'. +;; BTW, if you close a fileset, files, which have been changed, will +;; be silently saved. Change this behaviour by setting +;; `filesets-save-buffer-fn'. ;;; Supported modes for inclusion groups (`filesets-ingroup-patterns'): ;; - Elisp @@ -82,9 +83,10 @@ ;;; Some variables -(unless (boundp 'filesets-running-xemacs) - (defvar filesets-running-xemacs (string-match "XEmacs\\|Lucid" emacs-version) - "Non-nil means we are runninn XEmacs.")) +(eval-and-compile + (unless (boundp 'filesets-running-xemacs) + (defvar filesets-running-xemacs (string-match "XEmacs\\|Lucid" emacs-version) + "Non-nil means we are runninn XEmacs."))) (defvar filesets-menu-cache nil "The whole filesets menu.") @@ -923,7 +925,7 @@ of the file name pattern. :filter-dirs-flag BOOLEAN ... is only used in conjunction with :tree. :tree-max-level INTEGER ... recurse into directories this many levels -(see `filesets-tree-max-level' for a full explanation) +\(see `filesets-tree-max-level' for a full explanation) :dormant-flag BOOLEAN ... non-nil means don't show this item in the menu; dormant filesets can still be manipulated via commands available -- 2.39.5