Function: klabel:level-legal

klabel:level-legal is a byte-compiled function defined in klabel.el.

Signature

(klabel:level-legal LABEL)

Documentation

Return outline level as an integer of legal-style LABEL.

First visible outline cell is level 1.

Source Code

;; Defined in ~/.emacs.d/elpa/hyperbole-20260414.325/kotl/klabel.el
(defun klabel:level-legal (label)
  "Return outline level as an integer of legal-style LABEL.
First visible outline cell is level 1."
  (if (string-equal label "0")
      0
    (let ((i 0)
	  (level 1)
	  (len (length label)))
      (while (< i len)
	(if (eq (aref label i) ?.)
	    (setq level (1+ level)))
	(setq i (1+ i)))
      level)))