[nongnu] elpa/tablist faab7a0 60/60: Merge pull request #20 from tarsiiformes/sections

[Philip Kaludercic]

branch: elpa/tablist
commit faab7a035ef2258cc4ea2182f67e3aedab7e2af9
Merge: 778eee5 3fc27c7
Author: politza <politza@fh-trier.de>
Commit: GitHub <noreply@github.com>

    Merge pull request #20 from tarsiiformes/sections
    
    Add and improve sections
---
 tablist-filter.el | 20 ++++++++++++++++++--
 tablist.el        |  4 ++++
 2 files changed, 22 insertions(+), 2 deletions(-)

diff --git a/tablist-filter.el b/tablist-filter.el
index 00c8a1d..c5d56b8 100644
--- a/tablist-filter.el
+++ b/tablist-filter.el
@@ -32,6 +32,10 @@
 (defvar wisent-eoi-term)
 (declare-function wisent-parse "semantic/wisent/wisent.el")
 
+;;
+;; *Variables
+;;
+
 (defvar tablist-filter-binary-operator
   '((== . tablist-filter-op-equal)
     (=~ . tablist-filter-op-regexp)
@@ -74,6 +78,10 @@
      ((filter or filter) `(or ,$1 ,$3))
      ((?\( filter ?\)) $2))))
 
+;;
+;; *Filter Parsing
+;;
+
 (defun tablist-filter-parser-init (&optional reinitialize interactive)
   (interactive (list t t))
   (unless (and tablist-filter-lexer-regexps
@@ -255,6 +263,10 @@
          (_ (error "Invalid filter: %s" filter)))))
     (feval filter)))
 
+;;
+;; *Filter Operators
+;;
+
 (defun tablist-filter-get-item-by-name (entry col-name)
   (let* ((col (cl-position col-name tabulated-list-format
                            :key 'car
@@ -343,7 +355,7 @@ and \(...\) to group expressions.")
        (help-mode)))))
 
 ;;
-;; **Filter Functions
+;; *Filter Functions
 ;;
 
 ;; filter ::= nil | named | fn | (OP OP1 [OP2])
@@ -392,7 +404,7 @@ else return nil."
     (_ (funcall fn filter))))
 
 ;;
-;; Reading filter
+;; *Reading Filter
 ;;
 
 (defvar tablist-filter-edit-history nil)
@@ -445,4 +457,8 @@ else return nil."
       filter)))
 
 (provide 'tablist-filter)
+;; Local Variables:
+;; outline-regexp: ";;\\(\\(?:[;*]+ \\| \\*+\\)[^\s\t\n]\\|###autoload\\)\\|("
+;; indent-tabs-mode: nil
+;; End:
 ;;; tablist-filter.el ends here
diff --git a/tablist.el b/tablist.el
index 59fe7a7..df8778b 100644
--- a/tablist.el
+++ b/tablist.el
@@ -1938,4 +1938,8 @@ the 0-th column as numbers by the less-than relation."
                       (aref (cadr e2) column)))))
 
 (provide 'tablist)
+;; Local Variables:
+;; outline-regexp: ";;\\(\\(?:[;*]+ \\| \\*+\\)[^\s\t\n]\\|###autoload\\)\\|("
+;; indent-tabs-mode: nil
+;; End:
 ;;; tablist.el ends here