/[emacs]/emacs/lisp/filesets.el
ViewVC logotype

Diff of /emacs/lisp/filesets.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1 by rms, Sun Apr 28 21:14:41 2002 UTC revision 1.2 by pj, Mon Apr 29 08:48:01 2002 UTC
# Line 2  Line 2 
2    
3  ;; Copyright (C) 2002 Free Software Foundation, Inc.  ;; Copyright (C) 2002 Free Software Foundation, Inc.
4    
5  ;; Author: Thomas Link aka t.link (at gmx at)  ;; Author: Thomas Link <t.link@gmx.at>
 ;; Time-stamp: <2002-03-22>  
6  ;; Keywords: filesets convenience  ;; Keywords: filesets convenience
7    
8    ;; This file is part of GNU Emacs.
9    
10  ;; This program is free software; you can redistribute it and/or modify  ;; This program is free software; you can redistribute it and/or modify
11  ;; it under the terms of the GNU General Public License as published by  ;; it under the terms of the GNU General Public License as published by
12  ;; the Free Software Foundation; either version 2, or (at your option)  ;; the Free Software Foundation; either version 2, or (at your option)
# Line 26  Line 27 
27    
28  ;;; Commentary:  ;;; Commentary:
29    
30  ;;Define filesets, which can be opened or saved with the power one or  ;; Define filesets, which can be opened or saved with the power one or
31  ;;two mouse clicks only.  A fileset is either a list of files, a file  ;; two mouse clicks only.  A fileset is either a list of files, a file
32  ;;pattern, a base directory and a search pattern (for files), or an  ;; pattern, a base directory and a search pattern (for files), or an
33  ;;inclusion group (i.e. a base file including other files).  ;; inclusion group (i.e. a base file including other files).
34    
35  ;;Usage: 1. Put (require 'filesets) into your start-up file.  2. Type  ;; Usage: 1. Put (require 'filesets) into your start-up file.  2. Type
36  ;;M-x filesets-edit or choose "Edit Filesets" from the menu.  3. Save  ;; M-x filesets-edit or choose "Edit Filesets" from the menu.  3. Save
37  ;;your customizations.  ;; your customizations.
38    
39  ;;Caveat: Fileset names have to be unique.  ;; Caveat: Fileset names have to be unique.
40    
41  ;;Filesets.el adds a nifty filesets menu to your menubar.  If you change  ;; Filesets.el adds a nifty filesets menu to your menubar.  If you change
42  ;;your filesets on the fly, don't forget to select "Save Filesets" from  ;; your filesets on the fly, don't forget to select "Save Filesets" from
43  ;;the menu.  ;; the menu.
44    
45  ;;Pressing on the first item in the submenu will open all files at once.  ;; Pressing on the first item in the submenu will open all files at once.
46  ;;Define your own function, e.g. browse-url, for opening a fileset's  ;; Define your own function, e.g. browse-url, for opening a fileset's
47  ;;files.  Or define external viewers for opening files with other  ;; files.  Or define external viewers for opening files with other
48  ;;programs.  See `filesets-external-viewers'.  ;; programs.  See `filesets-external-viewers'.
49    
50  ;;BTW, if you close a fileset, files, which have been changed, will  ;; BTW, if you close a fileset, files, which have been changed, will
51  ;;be silently saved.  Change this behaviour by setting  ;; be silently saved.  Change this behaviour by setting
52  ;;`filesets-save-buffer-fn'.  ;; `filesets-save-buffer-fn'.
53    
54  ;;; Supported modes for inclusion groups (`filesets-ingroup-patterns'):  ;;; Supported modes for inclusion groups (`filesets-ingroup-patterns'):
55  ;; - Elisp  ;; - Elisp
# Line 82  Line 83 
83    
84    
85  ;;; Some variables  ;;; Some variables
86  (unless (boundp 'filesets-running-xemacs)  (eval-and-compile
87    (defvar filesets-running-xemacs (string-match "XEmacs\\|Lucid" emacs-version)    (unless (boundp 'filesets-running-xemacs)
88      "Non-nil means we are runninn XEmacs."))      (defvar filesets-running-xemacs (string-match "XEmacs\\|Lucid" emacs-version)
89          "Non-nil means we are runninn XEmacs.")))
90    
91  (defvar filesets-menu-cache nil  (defvar filesets-menu-cache nil
92    "The whole filesets menu.")    "The whole filesets menu.")
# Line 923  of the file name pattern. Line 925  of the file name pattern.
925  :filter-dirs-flag BOOLEAN ... is only used in conjunction with :tree.  :filter-dirs-flag BOOLEAN ... is only used in conjunction with :tree.
926    
927  :tree-max-level INTEGER ... recurse into directories this many levels  :tree-max-level INTEGER ... recurse into directories this many levels
928  (see `filesets-tree-max-level' for a full explanation)  \(see `filesets-tree-max-level' for a full explanation)
929    
930  :dormant-flag BOOLEAN ... non-nil means don't show this item in the  :dormant-flag BOOLEAN ... non-nil means don't show this item in the
931  menu; dormant filesets can still be manipulated via commands available  menu; dormant filesets can still be manipulated via commands available

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26