Lines Matching defs:fileset
32 ;; two mouse clicks only. A fileset is either a list of files, a file
48 ;; Define your own function, e.g. browse-url, for opening a fileset's
52 ;; BTW, if you close a fileset, files, which have been changed, will
112 "Non-nil means some fileset definition has changed.")
238 (defun filesets-reset-fileset (&optional fileset no-cache)
240 (if fileset
241 (setq filesets-submenus (lax-plist-put filesets-submenus fileset nil))
247 (defun filesets-set-config (fileset var val)
249 (filesets-reset-fileset fileset)
275 (filesets-reset-fileset)))
281 ; (filesets-reset-fileset nil t)))
299 (filesets-reset-fileset (car x))))))
305 "The fileset swapper."
444 time to time or if the fileset cache causes troubles."
550 A :tree fileset is defined by a base directory the contents of which
945 A fileset is either a list of files, a file pattern, a base directory
968 :files FILE-1 .. FILE-N ... a list of files belonging to a fileset
991 fileset. The function takes a file name as argument
994 fileset; it takes no arguments, but works on the current buffer.
1049 (list :tag "Conceal fileset (Flag)"
1053 (list :tag "Conceal fileset (Function)"
1069 "*Query the user before opening a fileset with that many files."
1272 a fileset
1415 (defun filesets-get-fileset-name (something)
1444 "Extract the value for KEY in the data part of fileset ENTRY.
1449 "Set the value for KEY in the data part of fileset ENTRY."
1457 "Return fileset ENTRY's mode: :files, :file, :tree, :pattern, or :ingroup.
1466 (defun filesets-entry-get-open-fn (fileset-name &optional fileset-entry)
1469 (filesets-data-get (or fileset-entry
1470 (filesets-get-fileset-from-name fileset-name))
1473 (defun filesets-entry-get-save-fn (fileset-name &optional fileset-entry)
1476 (filesets-data-get (or fileset-entry
1477 (filesets-get-fileset-from-name fileset-name))
1481 "Get the file list for fileset ENTRY."
1485 "Set the file list for fileset ENTRY."
1491 "Get verbosity level for fileset ENTRY."
1495 "Get the single file for fileset ENTRY."
1499 "Get the base directory + file pattern for fileset ENTRY."
1516 "Get the tree pattern for fileset ENTRY."
1520 "Get dormant flag for fileset ENTRY."
1527 "Get filter-dirs-flag for fileset ENTRY."
1531 "Get maximal tree scanning depth for fileset ENTRY."
1535 "Get the base file for fileset ENTRY."
1538 (defun filesets-file-open (open-function file-name &optional fileset-name)
1542 (filesets-entry-get-open-fn fileset-name))))
1560 (defun filesets-get-fileset-from-name (name &optional mode)
1561 "Get fileset definition for NAME."
1612 (defun filesets-run-cmd (&optional cmd-name fileset mode)
1618 (name (or fileset
1619 (completing-read "Select fileset: " filesets-data nil t))))
1624 (files (if (and fileset
1627 (filesets-get-filelist fileset mode event)
1629 (filesets-get-fileset-from-name name)
1714 "Get all files for fileset ENTRY.
1748 "Open the fileset called NAME.
1752 (completing-read "Open fileset: " filesets-data nil t)))
1753 (fileset (filesets-get-fileset-from-name name mode))
1755 (filesets-get-fileset-from-name lookup-name)
1756 fileset))
1758 (if fileset
1759 (let* ((files (filesets-get-filelist fileset mode 'on-open-all))
1768 (filesets-error 'error "Filesets: Unknown fileset: " name))))
1771 "Close all buffers belonging to the fileset called NAME.
1775 (completing-read "Close fileset: " filesets-data nil t)))
1776 (fileset (filesets-get-fileset-from-name name mode))
1778 (filesets-get-fileset-from-name lookup-name)
1779 fileset))
1781 (if fileset
1782 (let ((files (filesets-get-filelist fileset mode 'on-close-all))
1788 ; (message "Filesets: Unknown fileset: `%s'" name))))
1789 (filesets-error 'error "Filesets: Unknown fileset: " name))))
1792 "Add BUFFER (or current-buffer) to the fileset called NAME.
1793 User will be queried, if no fileset name is provided."
1799 (format "Add '%s' to fileset: " buffer)
1824 (message "Filesets: Can't add '%s' to fileset '%s'" this name)))))))
1827 "Remove BUFFER (or current-buffer) to fileset NAME.
1828 User will be queried, if no fileset name is provided."
1834 (format "Remove '%s' from fileset: " buffer)
1847 (message "Filesets: Can't remove '%s' from fileset '%s'"
1852 "Change fileset NAME's mode from :pattern to :files."
1947 "Get submenu epilog for SOMETHING (usually a fileset).
1949 LOOKUP-NAME is used as lookup name for retrieving fileset specific settings."
1975 (filesets-get-fileset-from-name something ':pattern))))]
2113 FS is a fileset's name. FLIST is a list returned by
2238 "Build submenu for the fileset ENTRY named LOOKUP-NAME.
2379 (filesets-reset-fileset)
2383 (defun filesets-rebuild-this-submenu (fileset)
2385 (filesets-reset-fileset fileset)
2391 fileset thinks this is necessary or not."