Function: logview--change-min-level-filter

logview--change-min-level-filter is a natively compiled function defined in logview.el.

Signature

(logview--change-min-level-filter MIN-LEVEL &optional ALWAYS-SHOW)

Source Code

;; Defined in /nix/store/3zkn9hgpv447zb8nrg55d9x2ynmmrk40-emacs-packages-deps/share/emacs/site-lisp/elpa/logview-20260218.2013/logview.el
(defun logview--change-min-level-filter (min-level &optional always-show)
  (when (and min-level (string= min-level (caar logview--submode-level-data)))
    (setq min-level nil))
  (let ((case-fold-search nil)
        (filter-prefix    (if always-show "LV" "lv")))
    (let* ((level-filter-at       (string-match (format "^%s .*$" filter-prefix) logview--main-filter-text))
           (level-filter-line-end (match-end 0)))
      (if level-filter-at
          (setf logview--main-filter-text
                (concat (substring logview--main-filter-text 0 level-filter-at)
                        (substring logview--main-filter-text
                                   (or (string-match-p "^" logview--main-filter-text level-filter-line-end)
                                       level-filter-line-end))))
        (setq level-filter-at 0))
      (when min-level
        (setf logview--main-filter-text (concat (substring logview--main-filter-text 0 level-filter-at)
                                                filter-prefix " " min-level "\n"
                                                (substring logview--main-filter-text level-filter-at))))))
  (logview--parse-filters))