Function: current-left-margin

current-left-margin is a byte-compiled function defined in indent.el.gz.

Signature

(current-left-margin)

Documentation

Return the left margin to use for this line.

This is the value of the buffer-local variable left-margin plus the value of the left-margin text-property at the start of the line.

Probably introduced at or before Emacs version 19.29.

Source Code

;; Defined in /usr/src/emacs/lisp/indent.el.gz
(defun current-left-margin ()
  "Return the left margin to use for this line.
This is the value of the buffer-local variable `left-margin' plus the value
of the `left-margin' text-property at the start of the line."
  (save-excursion
    (back-to-indentation)
    (max 0
	 (+ left-margin (or (get-text-property
			     (if (and (eobp) (not (bobp)))
				 (1- (point)) (point))
			     'left-margin) 0)))))